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NOTA: El contenido de este libro está 
basado en el uso de un ordenador aL 
anterior a su lanzamiento definitivo y la 
documentación proporcionada por Sinclair 
Research que ha manifestado su intención de 
mantener el diseño de la máquina. Por. _10 
« tanto, el uso de algunos comandos del (AL 
pueden requerir diferente manejo del que se 
explica en este volumen. Si encuentra algún 
problema, refiérase al. manual que viene con 
su ordenador. 
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PREFACIO -— TIM HARTNELL 


Andrew Nelson ha producido un trabajo 
impresionante en los últimos (8 meses. 
Libros de juegos para el TI 99/44 y el VIC 


ZO (publicados poe Virgin Books), el 
Spectrum (Addison-Wesley) y Escribiendo 
programas de aventuras (Interface 


Fublications. 


El éxito de estos libros es, en mi opinión 
un éxito menor cuando se compara con este 
libro sobre el Sinclair QL. 


El SuperBASIC con que está provisto el AL 
es un lenguaje que presenta increibles 
desaflos, pero que ofrece un enorme 
potencial para el programador. El 
SuperBASIC es un lenguaje que es una obra 
de arte como el QL en si mismo. 


Andrew nos ha hecho un pertfectc servicio 
mostrándonos como el QAL puede programarse 
incialmente como un "gran Spectrum”, y 
después como se pueden ir incorporando 
gradualmente las nuevas posibilidades del 
SuperBASIC en los programas. 


Tim Hartnell, 
Londres, 1784 
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CAPITULO UNO - 


CONE X IONADO 

Cuando usted desempaquete su QL, podrá ver 
el ordenador con su guia del usuario, una 
fuente de alimentación, varios cables, el 
cable de la red de datos, dos estuches de 
Microdrives (uno con cuatro Microdrives sin 
grabar y la otra con los Microdrives de los 
programas que se suministran con el QL) y 
unas pequeñas patas de plástico para poner 
bajo el QL por si se quiere variar el 
ángulo del teclado. Probablemente encontra- 
rá -— como yo lo hice - que es más fácil de 
manejar el OL si le coloca estas patas. 


Ocultos en la parte de atrás de su QL se 
encuentran unas ranuras y zócalos  , donde 
se conectan los cartuchos KOM, impresoras, 
? joysticks? y otros dispositivos. 


eonoctar ROM OL 2:Roe local ds datos 


Bupuertas Joystick ZuR8-232-C TVIUNF) — Monitor El 


Oanoctor de expansión Conector Nicrodrivos adicional os 


Si usted gira su 0OL para ver estos 
conectores, verá que son para los 
siguientes usos (empezando por el extremo 
izquierdo según se ve desde la parte de 
atrás de la máquina): 
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- red de datos 

- red de datos 

- alimentación 

- salida para monitor RKGE 

- salida para televisor UHF 
-= puerta. serie uno 

- puerta serie dos 

= control uno (joystick) 

= control dos 

= cartuchos ROM 


Hay Una ranura de xpansión en el lado 
derecho mirando desde atrás) para conectar 
una expansión de memoria de medio megabyte 
u otros periféricos. 


Las ranuras de la red de datos le permiten 
conectar hasta £4 QL*"s y Spectrums en lo 
que se llama una "local area network* tred 
de datos de área local, QOLAN en el lenguaje 
Sinclair. Los diferentes ordenadores en la 
red de datos pueden “hablar” a cada uno de 
los otrcs a 100kÉ . baudios (baudio es la 
unidad de velocidad de trasmisión de 
intormación y para mostrar su rapidez, 
considere que el Spectrum lee los programas 
del casette a aproximadamente 1.5). Los 
datos pueden mandarse por la red de datos 
de área local a cualquier ordenador que 
esté *escuchando” para recibirlos. 


En el frente, a mano derecha, están las 


ranuras para los Microdrives. No introduzca 
un Microdrive en su ranura antes de que el 
aL esté conectado. $51 lo hace, corre el 


riesgo de destruir los datos almacenados en 


nd 
a 


ese Microdrive. Cuando un Microdrive está 
girando vy el QL lo está leyendo, la luz que 
esta al lado de su ranura está encendida. 
No intente sacar el Microdrive mientras la 
luz esté encendida porque puede dañar el 
ordenador y el Microdrive. 


La puerta RGB es para conectar un monitor 
RGB. Si solo ha visto funcionar el Qu. en 


una televisión doméstica, recibirá una 
agradable sorpresa cuando conecte un 
monitor RGKE. La imágen es xtraordinaria- 


mente clara. 
CONEXION DE UN MONITOR 


Fara el de color, necesita un conector DIN 
de ocho vias para conectarlo en la parte 
trasera del QL, y un conector adecuado para 
el monitor en el otro extremo del cable. Se 
puede conectar un monitor monocromo al 
ordenador por medio de un conector de ocho 
vias (como para el de, color) o con un 
conector DIN de tres vias. su monitor 
monocrome debe tener una entrada para señal 
compuesta de video no-invertida de 759 ohm y 
1V pico a pico. Este es el tipo usual en 


= 


el Reino Unido, asi que si tiene un monitor 
en blanco y negro a mano, debe comprobar si 
responde a las espscificaciones. 


CONECTOR 


¡O COS CUE CONO CO SOS COGE COS ODO CS CEI CS E CIO SUS GA PO POGGI COI SOU OOO LOS OS cr Cs a a OS SONO SO SO OOO Co cn eos cn 


1 VIDEO Video monocromo 
compuesto (3) 

2 GND Tierra 

4 VSYNC Sinc. vertical (1) 

pe CSYNC Sinc. compuesto (2) 

6 ROJO Rojo (1) ] 

PS VERDE Verde (1) 

8 AZUL Azul (1) 


(1) O-SV TTL compatible 
(2) O-Svwv TTL compatible 
(3) 1V pico a pico a 79 


Conexiones para un conector 
para un monitor a color: 


GND 


(activa alta) 
(activa baja) 
ohms 


DIN de 8 vias 


VSYNC 


ROJO 


AZUL (centro) 


Conexiones para un conector DIN de tres 
vias para conectar su 0QOL aun monitor 
monocromo: 


o 


CAPITULO 2 -— 


PRIMEROS PASOS EN EL QL 


Cuando conecta por primera vez su QL, verá 
que la pantalla se llena brevemente con 
barras verticales rojas y verdes. Estas son 
reemplazadas con lo que podemos llamar 
*morralla de alta resolución” mientras que 
el QOL hace sus pruebas internas. 


A continuación, la pantalla se pone en 
negro y aparece el siguiente mensaje: 


F1 for monitor 
F2 for television 


O 1983 Sinclair Research Ltd 


Si pulsa la tecla de función uno (para 
indicar que tiene conectado un monitor en 
el zócalo marcado RGE) la pantalla se 
limpia para mostrarnos un area rectangular 
que llena los dos tercios de la pantalla. 
La mitad izquierda de este rectángulo es 
blanca, y la mitad derecha roja. Si pulsa 
la tecla de función dos (para decirle al QL 
que tiene un televisor conectada al zócalo 
UHF) la pantalla se pondrá completamente 
blanca. 


LAS TECLAS MAS IMPORTANTES 


Hay cuatro teclas con las que debe fami- 
liarizarse antes de empezar a programar el 
aL. 


La tecla ENTER es una que tiene forma de 
"L al revés”, en la tercera fila desde 
abajo en el borde derecho del teclado 
(justo al lado de la ranura de los Micro- 
drives). Esta tecla la usará cuando quiera 
que el QL haga algo. Si ha introducido un 
comando directo en la máquina tal como 
FRINT 6 + 7, debe pulsar ENTER para decirle 
al QL que siga adelante y haga lo que usted 
le acaba de decir (en este CasoO, imprimir 
el número 13). 


Tambien usará ENTER después de un comando 
como RUN (para ejecutar un programa) o NEW 
(para vaciar el ordenador del programa que 
tiene en memoria). ENTER en esta situación, 
asi como en la mencionada en el párrafo 
anterior, le dice el QL que usted quiere 
que ejecute el último comando. 


El tercer uso de esta tecla lo hace al 
teclear un programa. Una vez que Ea 
terminado de teclear una linea en el área 
negra debajo del rectángulo de la pantalla, 
para que el (QL acepte esa linea y la añada 
en el programa, debe pulsar la tecla ENTER. 


Hay dos teclas de cambio en el OL, una 


debajo de ENTER en el lado derecho, y la 
otra sobre CTRL a mano izquierda, la 
segunda tecla desde el borde inferior, en 
la segunda columma de ese lado. Si mantiene 
pulsada una de estas teclas SHIFT, 
escribirá en letra mayúscula cuando teclee 
algo (o, si hay algo mas grabado en la 
tecla, tal como el signo $ sobre el 4, 
obtendrá ese signo). 


En vez de mantener la tecla SHIFT pulsada 
cada vez que quiera letras mayúsculas, 
puede enganchar la tecla CAFSLOCE (sobre la 
tecla SHIFT de la izquierda). Todas las 
letras generadas por el teclado, Una vez 
que se ha enganchado  CAFSLOCK, aparecerán 


en mayúsculas (a menos que pulse SHIFT, en 
cuyo caso aparecerán en minúsculas). 
Fresione CAFSLOC: de nuevo para 


desengancharla. 


12345678918 11 12 13 14 13 16 17 
18 19 


Si quiere borrar una letra que acaba de 
teclear, mantenga pulsada la tecla CTRL (de 


*control”"), que está debajo de la tecla 
SHIFT de la izquierda, y después pulse la 
tecla *flecha atrás” (a la izquierda de la 


barra de espaciado). La tecla CTRL se usa, 
frecuentemente en combinación con la tecla 
ALT y otra tecla alfabética, para conseguir 
acciones especificas del ordenador. 
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MODOS GRAFICOS 


Veremos los modos gráficos en detalle más 
adelante en éste libro. Sin embargo, como 
una breve introducción, hay dos modos. MODE 
256 es el de más baja resolución, con (como 
ya habrá imaginado) 256 *pixels” (puntos, O 
elementos de dibujo). El modo alto es MODE 
s12 que le da doble resolución que MODE 
256. 


El GL se pone en modo 2506 si pulsa la 
tecla de función para indicar que tiene 
conectado un televisor y usa un cursor en 
forma de cuadrado intermitente de color 
púrpura. Si le dice que tiene conectado un 
monitor, el ordenador se va al modo alto, 
con un cursor en forma de rectángulo 
estrecho, intermitente en rojo. 


COLORES 


Puede mostrar ocho colores (azul, rojo, 
magenta, verde, azul claro, amarillo, 
blanco y negro) en la pantalla de 256, 
mientras que sólo cuatro son disponibles 
(negro, rojo, verde y blanco) con la de 
512. 


Se pueden crear muchos más colores usando 
diferentes combinaciones de *punteado”. Hay 
cuatro modelos de punteado (barras 
verticales, barras horizontales, puntos. 
grandes de fondo y puntos pequeños de 
fondo) que le permiten crear ¡un rango de 
colores enorme. 
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Si está usando un televisor O monitor en 
blanco y negro, verá ocho escalas de gris 
en el modo de 256 X 256, y cuatro escalas 
de gris en el modo Si2. El número de 
carácteres en la pantalla viene determinado 
por el modo en que se encuentre. El modo 
tomado por defecto, cuando se usa un 
monitor, es de 25 líneas de 80 caracteres. 
El formato normal, con un televisor, es de 
40 a 60 columnas, dependiendo del programa. 


EL RELOJ DE TIEMPO REAL 


El QL tiene una caracteristica que se 
encuentra en pocos ordenadores - un reloj 
de tiempo real que puede funcionar durante 
cinco años sin necesidad de cambio de 
baterias. 


Para acceder al reloj se usa el comando 
DATES (como en PRINT DATES). 


Cuando lo use, comprobará que el reloj le 
da un calendario completo, asi como la hora 
ten un reloj de 24 horas). Tiene el 
siguiente formato: 


dia-mes-año hora-minutos-segundos 
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PALABRAS CLAVE 


El SuperBASIC tiene un número de palabras 
clave incluidas que se dividen en tres 
grupos: procedimientos predefinidos, fun— 
ciones predefinidas y comandos. Usted puede 
añadir más definiendo procedimientos. 


Estos son los procedimientos predefinidos: 


ARC, ELLIFSE, LINE, FOINT, SCALE, BEEF, 
INPUT, FAUSE, FPRINT, BAUD, CLOSE, COFY, 
COPY_N, DELETE, DIR, FORMAT, OPEN, OPEN_IN, 
OPN_NEW, POKE, FOKE_W, .FPOKE_L,  RANDOMISE, 
CLEAR, CONTINUE, EXEC, EXEC_W,  LEYTES, 
LIST, LOAD, LRUN, MERGE, MRUN, NEW,  RETRY, 
RUN, SAVE, SBYTES, SEXEC, STOP, AT, BLOCK, 
BORDER, CLS, CSIZE, CURSOR, FLASH, INE, 
OVER, FAN, RECOL, SCROLL, STRIF, UNDER y 
WINDOW. 


Las funciones predefinidas son estas: 


BEEPING, INKEY$, KEYROW, ABS, ACOS, ACOT, 
ASIN, ATAN, COS, COT, EXF, INT, LN, LOG10, 
SINC, SORT, TAN, FI, CHR$, CODE, FEER, 
FEEK_W, PEEK_L y RND. 


Los comandos predefinidos en el OL son los 
siguientes: 


FOR, REFeat, SELect, ON, 1F THEN ELSE, 
DEFine FROCedure, DEFine FuNction, RETURN, 
DATA, END FOR, END IF, END  REFeat, END 
DEFine, END SELect, EXIT Y NEXT. 


Nótese que cuando se introducen comandos, 
no es necesario la palabra (o palabras) 
completa como se ve arriba. Una vez que ha 
introducido la parte en mayúsculas (como en 
REF para REFeat) el (AL escribirá el resto. 
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CAPITULO 3 — 
CONCEPTOS DEL SUPERBASIC 


SuperBASIC es un lenguaje de programación 
desarroyado por Sinclair Research que puede 


parecer al principio —- como sugiere su 
nombre — sólo una pretenciosa versión de 
otros BASICs. Realmente, tiene cierta 
semejanza con el EASIC del Spectrum (y si 


quiere puede programar el QL mas oO menos 
como un Spectrum), pero el  SuperbASIC es 
más, mucho más que esto. 


En efecto, está tan lejos del BASIC, 
cuando se usa eficientemente, que Sinclair 
dijo que pensaron seriamente en llamarle de 
otra forma, pero pensaron que la gente no 
querria la máquina si ello significaba 
tener que aprender un nuevo lenguaje para 
programarla. 


Los cuatro componentes fundamentales del 
SuperBASIC son: 


- identificadores 

- la habilidad para manipular elementos 
relaccionados 

- coerción 

- troceado (slicing) 


para ayudarle en la transición al 

SuperBASIC desde otros BASICs, hay un 

número de palabras clave familiares tomadas 

de otros BASICs que no son totalmente nece- 

sarias. Esto le facilitará la transición 
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desde el BASIC clásico al BASIC del  QAL, 
estas palabras poco vitales le permiten 
también introducir programas escritos para 
otras máquinas con cambios minimos. Sin 
embargo, para sacar el mayor partido del 
ordenador, Y para usar el lenguaje al 
completo, le sugiero que tome el hábito de 
reemplazar las funciones superfluas con las 
del SuperBASIC. 


GOTO puede ser reemplazada con IF, REFeat 

y similares, y GOSUB puede ser reemplazado 
con una: llamada a un procedimiento 
(definido con DEFine FROCedure). : ON...GOTO 
(que no ha sido incluido en las anteriores 
máquinas de Sinclair) puede ser reemplazado 
en SuperBASIC com  SELect, asi como 
ON... . GOSUK. 


Hay muchos otros comandos que le son 
familiares, y realizan en SuperBASIC lo 
mismo que en otros KASICs. Estos incluyen 
comandos como FEEE y FPOKE, LIST, READ y 
DATA. Otros, como REMark y SORT, obviamente 
sustituyen las formas mas familiares (REM y 
Sar). 


Hay otros comandos que ya no funcionan, 
como LLIST que se usa en la mayoria de los 
ordenadores para sacar un listado impreso. 
Esto se puede realizar en el OL abriendo un 
canal a la impresora, y después  'usando 
LIST, que sirve tanto para listar a una 
impresora como a la pantalla. 
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Encontrará que puede conseguir que el  QL 


haga cualquier cosa que los otros 
ordenadores hacen con el BASIC (ys por 
supuesto, bastantes cosas más), aunque 
puede necesitar aptitudes detectivescas 


para encontrar la combinación de comandos 
adecuada. Los comandos comunes no  soporta- 
dos por el AL incluyen el LLIST que ya 
hemos visto, LFRINT, VAL, STR*, IN, OUT, ON 
ERROR e INFUT. 


Como ya hemos apuntado, para que el AL 
liste a una impresora se usa LISTE, 
indicando el número de dispositivo.  LFRINT 
se efectúa de la misma forma, con FRINT£, 


VAL y STR$ no los incluye, porque no los 
necesita, como verá cuando hablemos de una 


caracteristica particularmente útil del AL 
llamada *coerción”. Como usted probablemen-— 
te sabe, VAL comvierte un número dentro de 
una cadena un su valor numérico equivalente 
(esto es, cambia "1" en 1, para que se 
pueda procesar como número). STR$ hace lo 
opuesto, comvirtiendo un número en una 
cadena (456 en "456"). esto se hace automa- 
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ticamente cuando se necesita en el QL. el 
ordenador fuerza el elemento a la forma 
correcta requerida, por lo que VAL y STR$ 
na son necesarios. 


IN y OUT, comandos incluidos en el 
Spectrum (asi como en otros ordenadores) no 
son aplicables al Motorola 68008, el 
procesador principal dentro del  (QL. (El 


otro procesador es el Intel 8049, que se 
usa para controlar el teclado, generar el 
sonido y actuar como un receptor  —RS-232-C. 
Hay también otros dos chips de diseño 
propio. Uno se cuida de la pántalla y la 
memoria y el otro controla los Microdrives, 
el reloj de tiempo real, la red local de 
datos y la trasmisión RS-2132-C.) 


La palabra WHEN se usa en el QlL para 
reemplazar ON ERROR e IN INFUT que no estár. 
soportadas. 


ACCION INMEDIATA 


Como apuntabamos brevemente hace poco, uima 
sentencia en SuperBASIC le dice al aL que 
haga algo, ya sea inmediatamente, o despué= 
cuando le de KUN al programa que contiene 
esa sentencia. Si la sentencia empieza con 
un número, el ordenador sabe que es parte 
de un programa y no la ejecutará hasta que 
de RUN al programa. 


Sin embargo, si no tiene núumero de linea 
delante de la sentencia, el (UL asume que 
quiere que ejecute la sentencia tan pronto 
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como usted pulse la tecla ENTER. 


For lo tanto, si teclea FRINT "HOLA", y 
después pulsa la tecla ENTER, la palabra 
HOLA se imprimirá en la pantalla. Sin 
embargo, si teclea 10 FRINT "HOLA" y luego 
pulsa ENTER, la linea se moverá simplemete 
a la sección superior de la pantalla para 
mostrarnos que ha sido aceptada como uma 
linea de programa. Y (ahora tiene que 
teclear RUN, y pulsar ENTER de nuevo, para 
que imprima HOLA en la pantalla. 


Una sentencia directa que esta diseñada 
para su ejecución inmediata puede estar 
construida con más de una sentencia simple. 
Fuede usar *dos puntos” (:) para unir las 
secciones separadas. For lo tanto FRINT 
"HOLA": FRINT "ADIOS" puede ser introducido 
como lima sentencia directa, que resultará 
-= cuando pulse la tecla ENTER -— en las 
palabras HOLA y ADIOS escritas en la 
pantalla. 


NUMEROS, NUMEROS, NUMEROS 


Si usted empezó su experiencia con los 


ordenadores - como yo lo hice — con un 
ZX80, recordará que el mayor número que 
podia tener era un miserable 232767 (y el 
menor era —32767 O -—32766 en algunas 


circunstancias). En comparación con esto, 

el QL tiene una forma que puede resultar 

confusa. Aunque los limites de enteros 

(números completos) son -232767 a +32767, 

y las variables que los contienen se defi-— 
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nen con el nombre de la variable seguido 
del signo “tanto por ciento” (como AZ por 
ejempio), el rango de números de "coma 
flotante se ensancha hasta los limites de 
la galaxia. 


El rango de números de coma flotante 
avarca desde -10 elevado a la potencia -615 
hasta 10 elevado a la potencia 6ólS. Se 
pueden obtener digitos decimales signitica- 
tivos desde mas/mencs 10 elevado a. la 
potencia -615 hasta mas/menos 10 elevado a 
la potencia 615. El OL toma este número de 
digitos decimales significativos por 
defecto cuando se conecta. 


Las cadenas de literales pueden ser de 
hasta 12768 carácteres de longitud (ya 
describiremos las cadenas en detalle un 
poco más adelante). 


ESCRIBIENDO PROGRAMAS 


Todos los anteriores ordenadores 
Sinclair tenian un rango de número de linea 
desde 1 (tambien 0 con un FOFE) hasta 9999. 
El rango para el AL es desde 1 a 32767. 


¿UA A O 10 15 0 00 E 
USD DOS Aaa BA 
8 EN EE A 1 0 1 1 A 10 E E EA 
O A 
(6 


10 as 0 E ES 


EL EDITOR DE PANTALLA 
$ 

El comando EDIT se usa, obviamente, para 
editar una:.linea de programa. Fuede llamar 
al editor tecleando un comando de la 
siguiente forma: 


EDIT nnn (nnn es el número de linea) 


Si no especifica número de linea, el 
ordenador tomará la linea de número más 
bajo del programa. Á medida que modifica la 
linea, se irá resaltando, para indicar que 
el procedimiento interno de detección de 
errores de sintaxis del QL todavia no ha 
tomado esta linea. 


Una vez que haya pulsado ENTER, para 
indicar que ya ha terminado con la linea, 
el AL comprobará la sintaxis de la linea. 
Si está libre de errores, entonces la linea 
entrará en el programa, reemplazando la 
versión original (*pre-EDIT”) de esa 
linea. El QL es un duro capataz, y no le 
dejará introducir la linea hasta que haya 
pasado el proceso de revisión de sintaxis. 


Si está ' editando una linea que no cabe 
completamente en la pantalla, verá que la 
linea se desplaza hacia arriba 
automáticamente, a medida que mueve el 
cursor a lo largo de ella, de forma que la 
parte de la linea con la que desea trabajar 
aparece en la pantalla. 


Edit trabaja de dos modos —- inserción y 
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cambio (o *sobre-escritura*). Fuede cambiar 
de uno al otro con la tecla ALT. En modo 
inserción, el material que está tecleando 
es añadido antes del existente que se mueve 
a lo larzo para dejarle espacio. 


La versión del pre-EDIT puede ser: 
190 A=INT (M/0): FRINT A 


Si estuviera en modo inserción, debe mover 
el cursos hasta justo después de los dos 
puntos y añadir el nuevo material como 
sigue: 


B=5SxXA: 
La linea completa debe leerse: 
190 A=INT(M/0):B=SxXA:FRINT A 


El viejo material se desplaza lateralmente 
para dejarle sitic al nuevo. 


53 estuviera en modo cambio, o modo 
sobre-escritura, la linea se verla asl: 


190 A=INT (M/0) :B=3xXA:A 


Ahora debe hacerse cargo del espacio extra 
y la Á al fimal de la linea usando la tecla 
CTRL en conjunción con la tecla de la 
flecha a derecha. 


Si está trabajando en una linea, en modo 
EDIT, y cambia de idea, puede recuperar la 


SEARS 
da di 


linea original sin alterar simplemente 
pulsando la tecla ESC. Fara salir del modo 
EDIT, pulse ESC después de que haya 
terminado con uma linea y ésta haya sido 
aceptada mediante la tecla ENTER. 


EJECUTANDO PROGRAMAS 


Como en el Spectrum, el QAL limpia automá- 
ticamente todas las variables (las 
numéricas a cero y las cadenas vaciandolas) 
cuando teclea RUN y pulsa ENTER. Fuede 
preservar los valores arrancando el 
programa con el comando GOTO 1 (aunque no 

xista la linea número 1). 


Si desea empezar la ejecución del programa 
en una linea especifica, puede usar GOTO n 
(donde nes la linea del programa) para 
preservar las variables, o RUN  n, cuando 
las variables deban ser  limpiadas, y la 
ejecución empezará en la linea especificada 
(o en la de número inmediatamente superior, 
s1 esa linea no existe). 


Si por alguna razón corta la ejecución del 
programa - como para revisar el valor de 
una variable - puede continuar la ejecución 
desde el punto de corte con eli comando 
CONTINUE. 
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CAPITULO 4 — IDENTIFICADORES 


Un identificador puede tener hasta 2503 
caracteres de longitud, pero debe empezar 
por una letra (o un signo %* en algunos 
casos, Cuando se asume que es un 
identificador del sistema No vamos a 
discutir éste caso especial aqui). Fuede 
continuar el primer carácter con cualquier 
combinación de letras o números Y — muy 
importante - el carácter de subrayado 
también puede ser usado. Si termina con el 
simbolo $, entonces se entiende que el 
identificador es para uma cadena. Si termi-— 
na con %, es para una variable de Número 
entero. 


El subrayado es particularmente datil para 


permitir producir identificadores que 
etiqueten claramente un bucle, función 0 
cualquier cosa. For ejemplo, todos los 


identificadores que siguen son válidos: 


resultado 
respuesta 
resultado_final 
fin_del_juego 
efecto_2a 


Asegúrese de no confundir el subrayado (_) 
con el guión (-). Es fácil  contfundirlos, 
especialmente porque están los dos en la 
misma tecla, al lado de la tecla del cero 
en la fila superior. Sin enganchar  CAFS 
LOCK, o sin pulsar la tecla SHIFT, ésta 
tecla debe dar el guión.  Enganchando  CAFS 
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LOCK o manteniendo pulsando SHIFT, y la 
tecla nos dará el carácter de subrayado. 


Nótese que el aL (en comán con el 
Spectrum) no diferencia entre mayúsculas y 
minúsculas en los identificadores. Esto 


significa que los siguientes son todos 
idénticos, en lo que concierne al (LL: 


respuesta_Je 
RESPUESTA_3E 
Respuesta_le 
Respuesta_ZE 
rEspuesTA_e 


El identificador es un concepto ftundamen— 
tal en el  SuperBASIC. Encontrará que a 
medida que se va acostumbrando a trabajar 
con el lenguaje, usará identificadores en 
todos los programas que escriba. Una vez 
que reconozca la claridad adicional que da 
a sus programas el uso de cosas como los 
procedimientos (en vez de GOTO O  GOSUE), 
ayudado por los identificadores explicitos, 
se dará cuenta de la potente herramienta de 
programación que es realmente el 
SuperBASIC. 


Note sin embargo que, aunque en algunas 
circunstancias, un ¿identificador aparece 
como si fuera una variable, éste no lo es. 
Un identificador es una etiqueta que coloca 
el QAL en un objeto especifico que ha 
almacenado. El QL. tiene otras piezas de 
información "enganchadas” al nombre del 
identificador. Esto incluye la naturaleza 
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de lc que está identificando (es una 
cadena”? un número de coma +lotante”), el 
ejemplo especifico de la clase de cosas 
identificadas que han sido almacenadas 
realmente ("Josue" o 778.45), y donde está 
localizado el objeto en su memoria. 


Usando el identificador Á, el  SuperBASIC 
puede manipular los valores enganchados a 
este identiticador, junto con  cuialquier 
valor relaccionado a los identificadores BE, 
Cl y sucesivos que son parte de la 
definicion del identificador A. 


EST 
a / 
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CAPITULO 3 - COERCION 


Hechemos una mirada más detallada a la 
coerción. en la vasta mayoria de los 'otros 
BASICs, incluidos aquellos proporcionados 
en el ZX81 y el Spectrum, el introducir un 
tipo de datos equivocado conducia a: un 
fallo del sistema. 


Considere el siguiente programa: 


10 FRINT "INTRODUZCA UN NUMERO" 
20 INFUT A. 

3O PRINT "AHORA INTRODUZCA OTRO" 
40 INFUT Es 

SO PRINT "EL TOTAL ES "¡A + Bs 


Si usted ejecuta esto en la mayoria de los 
ordenadores, el programa debe fallar en la 
dltima linea. Intenta efectuar una suma 
entre un número y una cadena. 


Sin embargo, si ejecuta este programa en 
el OL, sumará los dos juntos sin problemas, 
suponiendo que pulse una tecla numérica 
cuando le pida introducir el segundo 
número. 


supongamos que pulsa la tecla "2". Aunque 
su entrada se almacenará como "2" dentro 
del QL (en oposición a 2, como número), el 
ordenador lo convertirá en 2, de forma que 
podrá ser sumado. 
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El QL realizará la coerción solamente si 


le es posible. Consideremos el siguiente 
programa, que fallaria en la mayoria de los 
ordenadores, pero que nos muestra la 


coerción actuando de modo opuesto al primer 
ejemplo: 


10 PRINT "CUAL ES SU NOMBRE”? " 
20 INFUT AS 

30 PRINT "QUE EDAD TIENE?” 

40 INPUT E 

SO LET C$=A$ E E 

60 PRINT C$ 


Nótese el uso del  ampersand (2) en la 
linea SÓ, en vez del signo mas (+). Esto le 
dice al QL que quiere trabajar con cadenas, 
en vez de números. (Note tambien que el LET 
de la linea S0 es opcional.) 


Cuando lo ejecute en el QL, vera lo 
siguiente: 


CUAL ES SU NOMBRE? 
ANDRES 
QUE EDAD TIENE” 


a” 
pa 


ANDRES22 


La última linea es el resultado de añadir 
las dos cadenas juntas. Por supuesto, su 
edad - en este caso - fué aceptada y 
almacenada por el Qu como un námero, 
y después coercitada dentro de una cadena 
de forma que pudiera ser añadida a la otra 


30 


cadena (su nombre). La palabra 
?*concatenación” se usa para describir la 
adición de dos cadenas. 


“La coerción trabajará en los siguientes 
casos: 


LET A="345" + 96 (resultando 441) 

LET A="13"+"356"+"99" (resultando 168) 
LET A$=245 £ 245 (resultando "245245") 
LET A$="345" £ 96 (resultando "14596") 


Cuando esté añadiendo dos números de coma 
flotante, y asignándolos a una variable de 


coma +tflotante -—(cualquier combinación de 
letras y números, empezando por uma letra, 
tales como A8976 o BNGSS o BN77BN), no es 


necesaria la coerción, y no sucede nada... 


De modo similar, si está asignando el 


resultado de la adición de dos números de 
coma +flotante a: una variable . entera 


(cualquier combinación de letras y números 
. empezando por uma letra y terminando por 
el signo %, como A786%, BE o BHIJHIJ%), los 
dos números de coma flotante no son 
coercitados, pero el resultado. de. la 
adición es almacenado como un entero. 


El uso del ampersand (%) y el signo mas 
(+) debe realizarse con sumo cuidado. Cual 
piensa que será la salida de estos dos 
programas cuando los ejecute en el QL” 

aL 


FROGRAMA A: 


10 A$="5734.63" 
¿0 B=152.76 

O C$=A$ + E 

40 PRINT C$ 


FROGRAMA B 


10 A$="65734.635" 
20 B=152.76 
30 C$=A$ % E 
40 PRINT C$ 


El programa Á nos devolverá "6907.41", 
mientras que el programa B nos devolverá 
"'£5734.65152.76". En el primer programa el 
QL coercita el "5734.65" como el número de 
coma flotante 6754.65 y, dejando BE como el 
número de coma flotante 1532.76, los añade 
numéricamente, después convierte la 
respuesta de coma flotante en una cadena. 


En el segundo programa,  B, la primera 
cadena permanece como tal, y el 152.76 es 
coercitado como "152.76". Después las dos 
cadenas son concatenadas. El signo + dice 
al QL que quiere tratar las variables como 
números y el : signo *% -indica que quiere 
tratar las variables como cadenas. 


CAPITULO 6 - 


OPERADORES 


El QL soporta los siguientes operaradores: 


ZN 


>= 


<> 


igual 


equivalente 


aenor que 
mayor que 
menor que 


o igual 


mayor que 
o igual 


no igual 


nuabrico 
cadena 


nusbrico 
cadena 


nuabrico 


nusbrico 


nunbrico 


nunbrico 


nunbrico 
cadena 


nuabrico 
cadena 


nunbrico 
cadena 


numbrico 
cadena 


numbrico 
cadena 


- igual lógico 
- comparación tipo 2 


- "casi igual” 
- comparación tipo 3 


- Suña 


resta 


división 


sultiplicación 


- menor que 
- comparación tipo 2 


mayor que 
- comparación tipo 2 


menor o igual que 
- comparación tipo 2 


mayor o igual que 
- comparación tipo 2 


no igual a 
- no igual 
comparación tipo 3 


e ampersand cadena  -  concatenación 


Pta modo bit - AND 

14 modo bit - OR 

q nodo bit - DR exclusivo 

O modo bit - NOT 

OR lbgico  - OR 

AND lbgico  - AND 

XOR lbgico  - OR exclusivo 
NOT lbgico  - NOT 

MOD nusbrico - nódulo 

DIV entero  - dividir 

de flotante - elevar a potencia 
El entero - elevar a potencia 


e senos unitario 


+ sas unitario (NOP) 


Imagine que su QL ejecuta el siguiente 
fragmento de programa: 


10 A=16+8x2 
20 PRINT A 
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Cuando lo ejecute, obtendrá como respuesta 
32 (16 mas 8 veces 2). Sin embargo, si la 
linea 10 se cambia para hacer esto... 


10 A=(16+8)x2 


...€l QL produciria la respuesta 
de 48 (dos veces la suma de 16 mas 89). 


La diferencia, por supuesto, está en los 
paréntesis. En la segunda versión de la 
linea 10, los paréntesis aseguran que l1ló y 
8 sean sumados antes de que tenga lugar la 
multiplicación. En el primer ejemplo la 


multiplicación se realizaba en primer 
lugar. 
Llamamos "orden de prioridad” la que 


determina el orden en que se efectúan las 
operaciones aritméticas. 


Aquí se listan por orden de prioridades en 
el QL (de mayor a menor): 


mas oO menos unitario 

concatenación de cadenas 

exponenciación 

multiplicación y división 
(division de enteros y módulos) 

suma y resta 

comparación lógica 

NOT 

AND 

OR y XOR 


Usted puede incluir operadores lógicos 
(da a = y demás) 'dentro de una xpresión. 
Si lo hace, y la xpresión es *verdad” 
(como A=Z12FPRINT A=A) entonces el ordenador 
le devolverá uno. Si la expresión es falsa 
(como en FRINT" 32323) entonces el OL le 


devolverá cero. 


CAPITULO 7 — 
MATRICES Y CADENAS 


Las matrices se usan cuando se quiere 
preparar una lista de objetos (números 0 
cadenas) a los que se pueda acceder 
refiriéndose a su posición dentro de la 
lista. 


Las matrices se preparan usando la 
sentencia DiMension. 


Una matriz es un grupo de espacios de 
memoria reservados dentro del QL. Cualquier 
elemento de la matriz puede ser referido 
dando el nombre de la matriz y un subindice 
que indica la posición del elemento dentro 
de la matriz. Fara producir en el QL una 
matriz que pueda contener cuatro números, 
introduzca la linea (asumiendo que el 
nombre de la matriz es HOLD): 


10 DiMension HOLD (2) 


Si quisiera que la matriz contuviera 45 
elementos numéricos, deberia usar una 
sentencia como esta: 


10 DiMension nombre_de_la_matriz (44) 


Como puede ver el número entre paréntesis 
es uno menos que el número de elementos que, 
queremos. Esto se debe a que eli primer 
elemento de una matriz es referido como 
elemento 0. 
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Asumamos que ha preparado una matriz de 
cuatro elementos con la sentencia: 


DiMension A(3) 


Cuando dimensione una matriz numérica como 
ésta, cada elemento contendrá un cero. For 
lo tanto, el siguiente programa... 


10 DiMension A(3) 
20 FRINT A(O) 
ZO PRINT A(l) 
40 FRINT A(2) 
50 FRINT A(Z) 


«a pPraducirildiis 


0) 
Ó 
O 
O 


Fuede llenarla como sigue: 


10 DiMension A(Z) 
ZO A(O)=10 

ZO A(1)=9,97 

40 A(2)=898273 
50 A(H)=65,.8781 


Fara referirnos al elemento que contiene 
898273 en la matriz (o lo que es lo mismo, 
para referirnos al 898273), todo lo que 
tenemos que hacer es referirnos a A(Z). Un 
programa puede manipular A(Z2) tan 
fácilmente como cualquier otra variable. 
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La matriz anteriormente mencionada es una 
matriz uni-dimensional, que puede ser usada 
como la que hemos visto, para contener uma 
lista de números. 


El QL, en común con la mayoria de los 
ordenadores, le permite tener matrices de 
más de una dimensión. Estas matrices son 


llamadas matrices multi-dimensionales. No 
hay limite para el número de dimensiones 
que usted puede tener en una matriz en el 
AL (aparte de la limitación impuesta por la 
memoria). 


Cuando usted dimensiona una matriz, el  QL 
reserva espacio para cada elemento de la 
matriz. La memoria es reservada, se usen 0 
no todos los elementos de la matriz por lo 
que las matrices multi-dimensionales 
consumen memoria a una velocidad 
prodigiosa, aunque usted ya ha cogido un 
buen trozo para jugar en el (AL, todavia 
puede usar uma gran cantidad antes de 

xperimentar problemas. 


De cualquier modo, una matriz 
multi-dimensional se define añadiendo un 
segundo (o tercero 0. cualquiera) número 


después del primero, en una linea DIiMension 
como la que sigue: 


10 DiMension HAT (3,2 


Esto prepara una matriz de cuatro por 
tres. El contenido de nuestras matrices 
uni-dimensionale pueden ser imaginadas como 
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una lista de números como los que siguen: 


89788 

2314 
12314 
45621 


Como contraste, las matrices bi-dimensio- 
nales (como la HAT anterior) deben ser 


imaginadas como uma tabla. Cuando se 
dimensiona por primera vez, todos los 
elementos de la matriz son -—- como ya save -— 


puestos a cero. Aqui está el contenido de 
los elementos de Hat, justo después de ser 
dimensionada: 


DIAS 

e a o o o o co ms cn 
O: + :0-0 "00 
110000 
210000 


Cada elemento dentro de la matriz es 
referido por medio de dos subindices. For 
ejemplo, el elemento de la esquina inferior 
derecha de la tabla es HAT(2,3). 


LITERALES DE MATRIZ 


El procedimiento explicado anteriormente, 
como probablemente sabe, es necesario para 
preparar realmente la matriz. Sin embargo, 
en vez de llenar la matriz con series de 
sentencias LET, o con READ y DATA, puede 
usar literales de matriz. 
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Fara ello, necesita usar las llaves (13) 
que están en las dos teclas justo ala 
izquierda de la parte alta de la *pata” de 
la tecla ENTER. 


Una vez que se ha preparado la matriz, la 
llenará usando los literales de matriz que 
le demostraremos enseguida. Note que el 
número de parejas de llaves, dentro de 
otras llaves, definen el número de 
dimensiones que tiene la matriz. 


Frocedamos con una matriz uni-dimensional, 
que contiene cuatro elementos: 


10 DiMension CAJA(Z) 

20 CAJA=18909,467322.2,333,7867 
O FRINT CAJA(O)3" "¿CAJA(CÍ) 

40 FRINT CAJA(2)353" "¿CAJA(Z3) 


Cuando lo ejecute, verá esto en la 
pantalla de su QL: 


8909 467322. 2 
333 786 


Como puede ver , la linea 20 ha llenado 
los elementos de la matriz CAJA. 


Ahora veremos como, usando literales de 
matriz, podemos llenar una matriz  multi- 


dimensional: 


10 DIMension BATA(1,1) 
20 BATA=116,4319,77373 
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Esto nos dará una matriz con el siguiente 
contenido: 


BATA(0,0)=6 
BATA(0, 1)=4 
BATA(1,0)=9 
BATA(1,1)=7 


MATRICES DE CADENAS 


Las matrices que hemos visto hasta ahora, 
incluidas BATA, HAT y demás, han sido 
matrices numéricas, diseñadas para contener 
números. 


El (AL proporciona también matrices de 
cadenas. Estas se deben DIiMensionar de 
forma ligeramente diferente. Si usamos una 
sentencia como la que sigue... 


DIiMension NOMBRES (3) 


««-se puede pensar que deberia 
crear una matriz de cadena en la que 
podriamos almacenar seis cadenas completas. 
Sin embargo, no es asi. Á diferencia de la 
mayoria de los otros BASICs no-Sinclair (la 
siguiente peculiaridad es compartida por el 
BASIC del 2ZX81 y el Spectrum), con una 
sentencia DiMension como la precedente el 
OL prepara una matriz de un solo carácter. 


Solo podemos usarla como s1que: 
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10 DiMension GEES$ (3) 
20 GEES$=< das a de GR Li PE de MA 


Fara almacenar palabras completas, tenemos 
que darle a la matriz uma segunda  dimen-— 
sión con un número que sea la longitud 
de la cadena mas larga que se vaya a 
almacenar en la matriz. Fara ver esto, el 
siguiente programa prepara una matriz que 
puede contener tres cadenas de hasta disz 
letras cada una: 


10 DIiMension AUT* (2,9) 
20 AUT$=2"J RUS", "T HARTNELL","L NORTH" 


Aunque es necesario añadir un segundo 
námero a la sentencia DiMension cuando se 
prepara una matriz de. cadenas, no es 


necesario usar un segundo elemento cuando 
se refiera a Una Cadena. El siguiente 
fragmento de programa nos lo aclarará: 


10 DiMension SALUDOS (1,7) 

20 SALUDOS=í"HOLA", "QUE TAL">3 
30 FRINT SALUDOS (0) 

40 FPRINT SALUDOS (1) 


La salida de este programa seria... 


HOLA 
QUE TAL 


...€n Vez dB... 


«como cabria esperar. 


En el vocabulario del QL existen otras 
palabras útiles para manipular cadenas. 


CHR$ Y CODE 


Este par de palabras realizan funciones 
complementarias. CHR*$ (llamada *char-dólar” 
o *"character-string*) transforma un número 
en su carácter equivalente. 


Esto es, FRINT — CHR$(46) imprimirá un 
punto. El CODE ASCII del carácter nt.” es 
46. Si quiere obtener el CODE de un 
carácter, solamente le tiene que decir al 
QL FRINT CODE "n", con el carácter en el 
lugar de la n. 


PRINT CODE "E" nos dará 66 


FRINT CODE "BATALLA" nos dará también 66 
ya que CODE toma justo el primer elemento 
de la cadena. 


El siguiente programa tambien nos dará 66: 


10 TEST$="BANANA" 
20 PRINT CODE TESTS 


Note que no necesita .comillas' para el 
nombre de la cadena (FUERTAS, FALABRAS,  —A$ 
etc.) para hacer que el ordenador devuelva 
el código. 
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Aqui tenemos los CODEs que usa el QAL para 
su juego de caracteres: 


(133 "234 £ 233 %36 1137 * 38 


"39 (40 )41 *x42 +.43% , 44 


-= 43 . 46 7/47 048 149 250 
331 432 34393 6 34 75 8 56 
937 :38 339 x< 60 = 61 62 
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TROCEANDO 


Las cadenas, en forma de matriz O MO. 
pueden ser troceadas Y ahora trataremos 
este tema. (En el QL también se pueden 
trocear las matrices numéricas. Esto será 
tratado después de las cadenas ya que con 
este tipo es mas fácil de entender, y esto 
nos hará más fácil la comprensión del 
troceado cuando hablemos de las matrices 


numéricas.) 


Antes de ver el troceado de los elementos 
de una matriz de cadena, veremos el 
troceado de cadenas en general. 


Veamos el siguiente programa: 


10 A$="JUGADOR DE CASINO" 
20 PRINT AS 
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0 PRINT A$(1) 

40 FPRINT A$S(2 TO 4) 
SÓ PRINT A$(3 TO) 
60 FRINT A$(TO 10) 


La salida que se produce es: 


JUGADOR DE CASINO 
J . 
UGA 

DOR DE CASINO 
JUGADOR DE 


La primera - JUGADOR DE CASINO —- no. es 
ninguna sorpresa. Después de todo, hemos 
asignado a A$ la cadena "JUGADOR DE CASINO" 
en la linea 10, asi que ya esperábamos que 
se imprimiera entera en la linea 20. 


Fero qué ha sucedido en la linea 30? 
Farece que hemos usado At como una matriz, 


sin embargo ésta no habla sido 
dimensionada. El manejo de las cadenas de 
Sinclair (en el ZX81, el Spectrum y ahora 
en el QAL) nos permite tratar partes de 


cualquier cadena como si fuera una matriz 
de caracteres simples. For lo tanto A$(1) 
es lo mismo que el primer ' carácter de la 
cadena Af. 


La linea 40, A$(2 TO 4), produce  "UGA" 
como salida. 

El mecanismo de troceado de cadenas toma en 
este caso el primer número entre paréntesis 
(que es el 2) y después saca el trozo de la 


cadena desde el carácter número 2 hasta 
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el siguiente número de carácter especifica- 
do (en este caso el 4). 


Veamos la porción de la cadena que está 
subrayada. Esta sección es (2 TO 4): 


y Y 


JUGADOR DE CASINO 


Asi es como trabaja el troceado, tomando 
elementos de una cadena desde el primer 
número especificado hasta el siguiente. 


Sin embargo, esto no parece ser cierto en 
la linea 50, que no tiene segundo número, 
el AL simplemente coje desde el carácter 
especificado hasta el final de la cadena. 
Asi, la parte subrayada de la cadena 
representa (5 TO): 


JUGADOR DE CASINO 


Como ya habrá adivinado, si no hay número 
delante de TO, empieza desde el principio 
de la cadena, y va hasta el carácter cuyo 
námero hemos especificado. Aqui está la 
porción de la cadena que saca la linea 60 
del programa anterior: 


JUGADOR _DE CASINO 


Note que el espacio entre las palabras se 
cuenta como un carácter. 


48 


VUELTA A LAS MATRICES 


Ya hemos visto como funciona el troceado 
con cadenas simples. Ahora aolicaremos 
estos conocimientos a los elementos de las 
matrices de cadena. Examine el siguiente 
programa, y antes de ejecutarlo en su (OL, 
intente predecir que efecto tendrá: 


10 DiMension GATOS$ (3,9) 
ZO GATOS$ (23)="RILL" 

30 GATOS$ (3)="SWING" 

40 GATOS$ (0) ="BACtH;" 

50 GATOS$(1)="LOGIC" 

60 GATOS$ (2) ="RUSTY" 

70 FRINT GATOS+$ (0) (1 TO 3) 
80 FRINT GATOS$(1) (TO 4) 
0 FRINT GATOS$ (2) (4 TO) 
100 FRINT GATOS$(3) (TO 1) 
110 FRINT GATOS$ (4) 

120 FRINT GATOS$ (5) (5 TO) 


Uma vez que haya hecho su predicción, 
introduzca y ejecute el programa en el  QL 
para ver si ha acertado. Si lo hizo, indica 
que ha cojido rápidamente los conceptos del 
troceado de cadenas en el SuperBASIC. 


Aqui tiene los resultados: 


EAC - esto es GATOS$(0) (1 TO 23) 
LOGI - esto es GATOS$(1) (TO 4) 
Y - esto es GATOS$ (2) (4 TO) 
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E - esto es GATOS$(23) (TO 1) 
- esto es GATOS$(4) que no ha 
sido asignada 
G - esto es GATOS$(5)(S TO) 


Fuede verse en GATOSt$() que GATOS$(3) 
(TO 1) es lo mismo que CATOS+(2)(123, y en 
GATOS$ (3) que GATOS(5) (5 TO) es lo mismo 
que GATOS$(3) (5) ya que esta cadena tiene 
solamente cinco elementos. 


Puede asignar trozos de una cadena a Otra. 
Aft="SALVAJE" (3 TO 6) 
n= »pondrá A$ igual a "LVAJ". 


También puede cambiar solamente una parte 
de uma cadena, usando el troceado como se 
ve en este programa: 


10 PRIM$="SINCLAIR" 
20 PRIM$(Z2 TO 5S)="HEC" 
30 FRINT FRIMS 


Cuando ejecute este programa, su aL 
J3 po . 
producirá este resultado: 


SIBECAIR 


Esto nos muestra que los elementos Z, 4 y 
sde la cadena original ("NC han sido 
reemplazadas con la otra cadena ("EEC">. 
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SUSTITUCION DE MATRICES 


En este momento, probablemente se le habrá 
ocurrido que puede ser posible cambiar 
partes de las matrices de cadena. Esto se 
puede hacer, como se ve en nuestro 
siguiente programa: 


10 DiMension FAL$(2,4) 

20 FPAL$(0)="JDLLY" 

3O FAL$(1)="GREEN" 

40 FAL$(2)="GIANT" 

SO FAL$(1) (3 TO)=FAL$ (2) (TO 2) 
60 FAL$ (0) =FAL (1) (4) £ FAL$(0) 
70 FRINT FAL$(0) 

80 FRINT FAL$(1) 


La salida de este inspirado programa es 
como s1gue: 


EJOLL 

GRGIN 
Que ha ocurrido con la "y" al final de 
"SFOLLEVES la cadena original asignada a 


FAL$I00% En  SuperBASIC, una Cadena es 
truncada (esto es, cortada) si no hay sitio 
para ella dentro de la matriz. FAL$ (2) no 
varla. FAL$(1) ha cambiado su tercero, 
cuarto y quinto elemento, (3 TO), por los 
dos primeros elementos, (TO 2), de FAL$(2), 
produciendo esta maravillosa palabra GRGIN. 


Como puede ver, si no hay sitio dentro de 
la cadena para contener totalmente la' otra 
cadena, la parte que no cabe es simplemente 
deshechada. Esto significa que no tiene que 
asegurarse que las cadenas a ambos lados 
del signo igual son de la misma longitud. 
El QL las cortará para que quepan. 


TROCEANDO MATRICES NUMERICAS 


Hemos visto como un trozo de matriz de 
cadena (o el trozo de una cadena) forma, en 
efecto, una "“submatriz”", en la cual el 
trozeado extrae uma sección de elementos 
que están —junto a los otros dentro de la 
cadena original. 


Aunque no importa si el tamaño de las 
cadenas en cada lado del  sigmo igual es 
igual o no (ya que, como hemos visto, el GAL 
corta la mayor al tamaño de la más pequera) 
esto si importa en las matrices numéricas. 
Aunque hay unas pocas excepciones  comple- 
jas es mejor proceder a pensar en este 
momento que ambos lados del signo igual 
deben ser de la misma longitud para 
permitirle asignar elementos de una matriz 
a otra. 


Aqui tenemos un programa que nos muestra 
los elementos de una matriz numérica siendo 
asignados a un trozo de otra matriz 
numérica: 


10 DiMension A(2,2) 

ZO DIiMension E(4,4) 

30 B(0,0)=7:B(0,1)=99 

40 E(0,2)=12:B(1,0)=24 
SO B(1,1)=11.4:B(1,2)=6 
60 BE(2,0)=122:B(2,1)=.9 
7O B(2,2)=4346:B(2,0)=971 
80 B(2,1)=1:B(2,2)=44 

90 A=B(0 TO 2,0 TO 2) 


Esto hace A(0,0) igual a 7, el valor de 
E(0,0), A(1,0) to 234, el valor de EB(1,0) 
etc. 


QUE LONGITUD TIENE UNA CADENA? 


La función LEN devuelve la longitud de una 
cadena, y lo podemos ver en acción en mel 
siguiente programa: 


10 INFUT "CUAL ES SU NOMBRE"; NE$ 
20 PRINT:PRINT 

ZO PRINT "BIEN, "¿NE$;" SU NOMBRE TIENE" 

40 FRINT LEN(NE$)¿" CARACTERES DE LONGITUD" 
50 FRINT:PRINT 

60 FRINT ""SALSA*? TIENE "¿LEN("SALSA") 

70 FRINT "CARACTERES DE LONGITUD" 
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CAPITULO 8 - 
PROGRAMACION ESTRUCTURADA 


Una de las mejores caracteristicas del 
SuperBASIC son los incentivos que le da 
para construir sus programas de manera 
clara y estructurada. Aunque los viejos, 
y menos elegantes mecanismos de bifurcación 
existen aún (como GOTO, GOSUB y ON...GOTO 
/ON...GOSUB) en el SuperBASIC, es para 
mantener un grado de compatibilidad con 
otros BASICs. 


Ya sugeri anteriormente que, si usted está 
familiarizado con otro BASIC (especialmen- 
te con el BASIC del Spectrum), puede 
empezar a programar el QL más o menos como 
si fuera un Spectrum, e introducir  gradu- 


almente elementos del BASIC QAL. en su 
trabajo. 
Las secciones de control, bucles Y 


bifurcación de su programa son las que van 
a ganar más con el SuperBASIC. 


LAS ESTRUCTURAS 


El vocabulario del OL es particularmente 
rico en este área, ofreciendole lo 
siguiente: 


4 CE THENI ELSE ENDIF 

SELect ON [ON var = ENDSELect 
FOR [NEXT IJ LEXITI [ENDFORIJ 
REFeat CNEXt 1  —C[EXITI ENDREFeat 


Nuestros viejos amigos GOTO y GOSUB están 
disponibles en el QAL, aunque no se  reco- 
mienda Su USO. 


GOTO 
GOSUBR RETURN 
ON exp GOTO/GOSUB list 


El QL ofrece también procedimientos con 
variables locales: 


DEFine FROCedure/Funcion nombre [(lista 
de parámetros) 1] 

LOCAL 

RETURN [valor] 

END DEFine 


COMPATIBILIDAD 


Empezaremos viendo los controles de flujo 
de programas con los que usted probablemen- 
te tenga alguna experiencia, GOTO,  GOSUE 
/RETURN, ON...GOTO y ON... GOSUE/RETURN. 


Aquí tenemos un programa simple que nos lo 
muestra en acción: 


1Q. PRINT. "ESTE ES EL OL. *“; 
20 GOTO 10 


Como usted sabrá, esto llenará la pantalla 
con lo siguiente, hasta que usted corte el 
programa: 


ESTE. ES. EL. QL. ESTE. ES EL. UL. ESTE. ES: El 
GL ESTE. ES EL. GL- ESTE ES EL GL ESTE ES 
EL. OL. ESTE: ES. EL. CUL ESTE ES Eb. GL: ESTE 
ES- EL: GIL. ESTE ES EL BL ESTE ES EL. UL ES 


En este programa, el QL ejecuta la linea 
10, después pasa a la linea 20 donde 
encuentra la instrucción GOTO 10. No se han 
puesto condiciones para esta transferencia 
de control desde la linea 20 a la 10. Esto 
ocurrirá todas las veces. Esto es una 
bifurcación incondicional. 


GOSUB funcioma casi de la misma forma, 
excepto que trabaja en paralelo con otra 
palabra - RETURN - que dirige la acción de 
vuelta aa la linea posterior a la que 
contenia la palabra GOSUB, como se ve en 
este pequeño programa: 


10 PRINT "ESTA ES LA LINEA 10" 

20 GOSUB 350 

ZO PRINT "ESTA ES LA LINEA 30" 

40 STOP 

SO PRINT "ESTA ES LA SUBRUTINA DE LA 30" 
60 FOR J=1 TO 600:NEXT J 
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70 FRINT "AQUI RETORNO" 
80 FOR J=1 TO 600 
90 RETURN 


Cuando ejecute esto, verá lo siguiente en 
la pantalla de su QL: 


ESTA ES LA LINEA 10 

ESTA ES LA SUBRUTINA DE LA S0 
(una breve pausa) 

AQUI RETORNO 
(otra pausa) 

ESTA ES LA LINEA 20 


El programa le dice primero que está en la 
linea 10, después toma el GOSUBE 50 en la 
linea 20. La sección del programa a la que 
va, que está entre la linea al que ha sido 
pasado el control (la SO en este Caso), y 
el RETURN (90 en nuestro programa) se llama 
subrutina. 


Una vez en la subrutina el QL lo dice con 
ESTA ES LA SUBRUTINA DE LA 50. Después de 
una pausa le dice AQUI RETORNO y después de 
otra corta pausa el programa toma el RETURN 
de la linea 90, que termina la subrutina, y 
manda la acción a la linea posterior a la 
que le mandó a ella , esto es, la linea 0. 


El *número de linea de. destino” para un 
GOTO o GOSUB puede ser el resultado de 
alguna operación aritmética (como X=A/BR: 
GOTO X) o de alguna expresión (como  GOSUE 
8XX). Si usa expresiones como estas, no 
podrá renumerar su programa del QAL con 
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RENUM ya que podria mandar al ordenador a 
cualquier parte equivocada. 


El QL tiene una variante de GOTO y  —GOSUE 
que no ha sido proporcionado en el BASIC de 
los anteriores Sinclair, el 0ON...GOTO y 
ON... GOSUB. 


He aqui un programa que nos muestra el 
ON. ..GOSUBE en acción: 


10 X=RND(1 TO 4) 

20 ON X GOSUB 40,60,80, 100 
30 GOTO 10 

40 PRINT "ESTO ERA UNO" 

SO RETURN 

60 PRINT "ESTO ERA DOS" 

70 RETURN 

80 PRINT "ESTO ERA TRES" 
90 RETURN 

100 PRINT "ESTO ERA CUATRO" 
110 RETURN 


El QL imprimirá ESTO ERA UNO si el número 
aleatorio generado en la linea 10 era un 1, 
ESTO ERA DOS si era el 2, y así  sucesiva- 
mente. Encontrará cual de los GOSUB tomará 
el ordenador contando los números de linea 
en la línea ON...GOSUB. El primero es 40, 
que significa que el QOL irá a la 40 si X es 
igual a 1. El segundo es 650, asi que el 
destino del GOSUB cuando X sea 2 es 60 y 
asi sucesivamente. 


ON...GOTO funciona de la misma forma, 
excepto que -—- por supuesto -— mo tiene 
RETURN para devolver la acción a la linea 
posterior a la sentencia ON...GOTO. 


REDUNDANTE 


GOTO, GOSUB, ON...GOTO y ON...GOSUB no son 
necesarios en el QL, debido a las ricas 
estructuras de control que proporciona. 


LA SENTENCIA IF 


La sentencia. IF. es el corazón de la 
habilidad del QL para tomar decisiones. En 
efecto, la diferencia principal entre una 
simple calculadora y un ordenador es la 
habilidad de este último para tomar 
decisiones (si encuentra que alguna 
condición es cierta, entonces toma esa 
bifurcación) y después actuar en esta 
decisión. 


El QL (en comán con otros ordenadores) 
puede comprobar las condiciones, y Usar los 
resultados para dirigir el siguiente paso 
que debe ejecutar el ordenador. 


Hay tres versiones de la sentencia IF en 
el QL. La forma más simple, y con la que 
usted estará mas familiarizado, es la 
IF/THEN. I1F se ha salido la leche, THEN 
ponte a llorar. IF tu micro BBC se ha roto, 
THEN comprate un ZX80. 


IF ...prueba... THEN ...haz algo... 
60 


Si el resultado de la prueba es verdad, 
entonces el QL realizará los pasos que 
siguen al THEN. El IF y el THEN forman una 
sentencia simple en el QL para este uso de 
IF. Aqui van unas formas posibles de lineas 
de programa conteniendo IF/THEN: 


IF NOMBRES$="ANDRES" THEN PRINT "HOLA" 
IF A+B>C THEN LET D=B 
IF j¡ugador=respuesta THEN GOSUB 1000 


En la segunda forma en que el IF puede ser 
empleado en el QL, el THEN no tiene por que 
estar dentro de la misma sentencia que el 
IF. Necesita usar ¡una tercera sentencia, 
END IF, para usarla en esta segunda  +forma, 
cuando un número de "THEN cambios”? son 
necesarios. 


Si revisa el pegeño segmento de programa 
que sigue, lo podrá ver en acción: 


10 IF AS$="4fin" THEN Ñ 


20 PRINT "Gracias por jugar" 

30 LET mayor_puntuacion=puntos 

40 LET cuenta_juego=cuenta_juego+l 
SO END IF 


Como puede ver, todas las sentencias entre 
el IF/THEN inicial (linea 10) y el END. IF 
(linea 50) son evaluados solamente si la 
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condición daue está siendo probada en la 
linea 10 es cierta. 


La tercera versión de IF/THEN sirve para 
dos cometidos. En la segunda versión, se 
podian ejecutar ono los pasos dentro de la 
sección IF/END IF. 


Aqui vemos el IF/END IF con la adición de 
LSE, que permite al QOL elegir entre dos 
acciones alternativas. Lo entenderá rápida- 
mente si sigue este programa: 


10 IF puntuacion:+mayor_puntuacion THEN 


20 FRINT "Nueva mayor puntuacion" 

20 ELSE 

40 FRINT "No supero la mayor puntuacion” 
50 END IF 

En este programa se puede ver que IF la 
puntuación conseguida es mayor que la 
puntuación más alta, THEN el programa 
imprime el mensaje "Nueva mayor  puntua-— 
cien Si la condición que se está 


probando en la linea 10 no es cierta, 
entonces se toma el ELSE, y el QL imprime 
"No supero la mayor puntuacion”. 


EL THEN OPCIONAL 
En contraste con el “Spectrum, pero en 


comán con otros ordenadores (como el BEC 
Micro y el Acorn Atom), la palabra THEN es 


opcional. El QL entenderá donde deberia 
estar, reemplazandolo por dos puntos (:) en 
la primera forma como sigue: 


IF resp=respuesta:FRINT "Esta bien" 


En las formas largas, puede quitarlo 
completamente: 


IF nombre$="Andres" 
PRINT "Bonito nombre" 
LET puntos=2*puntos 

END IF 


ANIDADOS 

Se pueden anidar IF/END IF tan profunda- 
mente como se quiera (asumiendo, por 
supuesto, que no use toda la memoria en el 


proceso). 


Aqui hay un programa que anida dos  IF/END 


IF. Asi como en los bucles FOR/NEXT 
anidados, cada NEXT está relaccionado con 
el FOR más cercano, cada END. IF se 
relacciona con el IF precedente más 
cercano: 


10 IF punt=puntuacion THEN 
20 IF nombre$="Andres" THEN 


ZO FPRINT "Bien hecho, Andres" 
40 ELSE 

90 PRINT "Lo conseguiste!” 

60 END IF 

70 END IF 


63 


REPETICION 


Hay dos formas fundamentales de controlar 
la repetición de secciones de código en el 
QL. El uso de REFeat/END REFeat OU  FOR/END 
FOR en conjunción con NEXT y EXIT. 


La estructura para REFeat/END REFeat es 
como sigue: 


REFeat etiqueta 

el material que quiere hacer 

mas el material que debe hacer el QL 
END REFeat etiqueta 


Fara FOR/END FOR debemos preparar el 
programa como sigue: 


FOR etiqueta = rango de repetición 
material que debe hacer el ordenador 
mas las tareas para el QL 

END FOR etiqueta 


como le dije hace poco, estos son usados 
con otras dos sentencias en el BASIC del QL 
que son NEXT etiqueta y EXIT etiqueta. 
Cuando el QL pasa por el NEXT en. su 
programa, a menos que el rango del FOR se 
haya excedido cuando llegue a la linea que 
sigue al NEXT, se va a la linea posterior 
al FOR o REFeat correspondiente. 


Si el OL llega a la palabra EXIT, pondrá 
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su atención a la linea que sigue al END FOR 
o al END REFeat elegido por la linea EXIT. 
Note que si está usando EXIT en un bucle, 
necesita usar END FOR O END  REFeat para 
terminarlo. 


Lo mejor de este tipo de construcciones es 
que le permiten preparar formas complejas 
de estructuras FOR/NEXT, DO/WHILE o 
REFeat/UNTIL, pero con la posibilidad de 
dejarlas a la mitad sin causar un fallo del 
sistema (como sucede en la mayoria de los 
ordenadores cuando se abandonan  prematura- 
mente los bucles FOR/NEXT) Or. sin cometer 
ofensas contra la ética de la programación 
estructurada. 


Esta carta de condiciones puede parecer 
irrelevante en este momento, pero a medida 
que vaya desarrollando su habilidad con el 
QL, encontrará que va  concibiendo sus 
programas más y más en forma estructurada. 
Una vez que sus ideas se hayan formado en 
este campo, descubrirá que ha desarrollado 
una cierta resistencia a escribir programas 
que trabajen, pero que estén tan  amontona-— 
dos que sean el equivalente electrónico a 
un emplaste. 


Usted puede preparar sus sentencias NEXT, 
EXIT y END -usando bucles FOR y REFeat  -— 
para incluir lo que Sinclair llama curiosa- 
mente *epilogo de bucle*. Un  epilogo de 
bucle es algo que se almacena cerca del 
final de un bucle y que solo se. ejecuta 
cuando se alcanza un resultado particular 
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dentro del tucle principal (COmo cuna 
puntuación determinada que sobrepasa la 
puntuación más alta hasta el momento). 


Aquí se ve la relacción con e: resto del 
bucle: 


FOR etiqueta = rango de repetición 
cosas a hacer EXIT 
NEXT etiqueta NEXT 
cierre del Canal 4 
END FOR etiqueta 


El epilogo se ejecuta solamente si su 
programa sale normalmente del bucle FOR. 
Sin embargo,si una condición es satisfecha 
dentro del bucle antes de que ocurra, el 
bucle termina y el programa sale usando la 
sentencia EXIT, el epilogo será ignorado. 


Si quiere proporcianar un cierre del Canal 
4 con un bucle REFeat, esta es la forma de 
hacerlo: 


REFeat etiqueta 
cosas que hacer 

IF algo THEN NEXT etiqueta 
epilogo 

END REFeat etiqueta 


Como puede ver, la .sentencia IF está 


encargada de introducir el cierre del 
programa. La condición dentro de  IF/THEN 
NEXT (llamada "algo” en el ejemplo 


anterior) determina cuando el epilogo debe 


ejecutarse o no. 
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SELECCIONANDO UNA DIRECCION 


SElect y END SElect han sido provistos 
dentro del vocabulario del QL para dar a la 
máquina otro mecanismo con el que 
determinar qué se debe hacer a continua- 
ción. El valor de la variable es comparada 
y la decisión se toma de acuerdo con el 
valor encontrado. 


En contraste con  IF/THEN (donde debe 
realizar una acción O saltar) e  IF/THEN/ 
ELSE "(donde puede ejecutar una de dos 
condiciones, o saltar ambas) de un gran 
número de respuestas alternativas. 


Verá que también puede añadir una 
sentencia ON REMAINDER que representa el 
curso de una acción que puede tomar el  QL 
si todas las pruebas son negativas (ninguno 
de los valores de variable especificado 
corresponden a una acción particular a ser 
tomada.) 


Aqui puede ver la apariencia que puede 
tomar un programa: 


10 SELect ON nivel 


ZO ON nivel=1000 

Po FRINT "No lo has hecho bien” 
240 bonificacion=200 

50 nivel=0 
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60 ON nivel =2000 


7O FRINT "Eres capitan" 

80 bonificacion=780 

290 nivel=0 

100 ON nivel=2000 

110 FRINT "Eres comandante" 
120 bonificacion=1560 

130 nivel=0 

140 ON nivel =REMAINDER 

LO FRINT "Eres Emperador" 
160 bonificacion=2000 


170 END SELect 


Usted puede ver Como éste programa 
imprime "No lo has hecho bien" y pone. la 
variable bonificacion a 200 si el nivel es 
1000; "Eres capitan" con bonificacion a 780 
si el nivel es 2000 y asl sucesivamente. Si 


el nivel no es 1000, 2000 o 3000, —entonces 
la sección ON REMAINDER toma control, cor 
el mensaje "Eres Emperador” impreso en la 


pantalla. 
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REEMPLAZAR IF/THEN 


Puede usar también SElect (sin END SELect) 
para proporcionar una sentencia más limpia 
que la que se podria obtener con una 
sentencia IF/THEN. Fara mostrarle lo que 
quiero decir, aqui tenemos algunas 
sentencias IF/THEN: 


10 1F result:500 AND resulti1000 THEN FRINT 
"No muy bueno" 

20 IF result:999 AND resulti2000 THEN pRINT 
"Apenas aceptable" 

ZO IF result:1999 AND resulti2000 THEN FRIN 


T "Estas mejorando" 


Puede usar SElLect para producir un progra- 
ma más claro como sique:z. 


10 IF SElect result=501 to 929292 THEN FRINT 
"No muy bueno" 


20 IF SElLect result=1000 TO 1999 THEN pRINT 
"Apenas aceptable" 
30 IF SELect result=200% TO 2999 THEN FRINT 


"Estas mejorando" 


Aunque éste programa no es más corto que 
la versión IF/THEN, realmente muestra más 
claramente qué valores debe tener la varia- 
ble result para producir un determinado 
efecto. En contraste con esto, la versión 
IF/THEN requiere mayor trabajo (esto es, 
debe pensar que 2200 significa "hasta pero 
no igual a, 2000* y asi sucesivamente. 
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CAPITULO 9 -— 
FUNCIONES Y PROCEDIMIENTOS 


Las funciones y procedimientos son 
elementos vitales en el diccionario de 
programación del QL. Una vez que los ha 
preparado -— usando DEFine FUNction y DEFine 


FROCedure -= los puede incluir en un 
programa escribiendo simplemente sus 
nombres. 

Una función actua como un número Qe) 
variable) que devuelve un valor, de +forma 


que cuando su nombre es incluido dentro de 
un programa, éste número (O variable debe 
seguirlo inmediatamente. La respuesta 
producida por esta función <e obtiene 
mediante el uso de la sentencia RETUEN. 


(Esta nc es la misma sentencia RETURN que 
termina una subrutina. Con funciones, debe 
pensar een ellas como el elemento de 
programación que devuelve una respuesta.) 


Le sugiero que defina sus procedimientos 


dol 


y funciones ai principio de | sus programas 
para el GAL (o en la subrutina de 
inicialización). El programa debe pasar 
sobre ellas antes de que puedan ser 
llamadas, para conocer qué- debe hacer la 
tunción o'procedimiento. 


He aquí una función tipica definida al 
principio de un programa del QL: 


10 DEFine FuNcion semistima (x.y) 


20 LOCAL punto_cinco 
ZO punta_cinco=INT((x+y)/2) 
40 RETURN punto_cinco 


30 END DEFine 


Si quiere ejecutar esta función en el 
curso de la ejecución de un programa, debe 
incluir una linea como esta: 


1 O 0 .. . 
110 FRINT semisuma(99, 12) 
1 a O .. . 


Como puede ver, esto le permite añadir 
palabras de manipulación aritmética al 
vocabulario dei AL (como en el  FORTH) de 
forma, que durante el resto del programa, 
solamente necesita referirse al nomtre que 
le ha dado (semisuma) para lisarla. 


Note el uso de la palabra LOCAL: en la 
linea 20 de la sección de de+inición de ia 
tunción. Esto le asegura que el valor - dado 


a la variable punto_cinco no se contundirá 
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con el uso de la variable en otros puntos 
del programa. Fuede tener, por ejemplo, ko 
Y y Z como variables LOCAL que pueden 
actuar con independencia de X, Y y Z a lo 
largo del programa (donde deben ser 
variables *globales”*?. Le sugiero que no 
asicne valores a las variables no-locales 
dentro de una función (O procedimiento, 
porque puede introducir en sus programas 
problemas dificiles de localizar, 


No es necesario que la sección que define 
una función tenga más de una linea si usted 
no quiere. Las siguientes son secciones 
perfectamente válidas para definir  —funcio- 
nes en el QL: 

DEFine FuNction doble=2Xx 
DEFine FuNction alea=RND(1 TO n) 


DEFine FuNction uno=x-1 


Usted las puede usar dentro de su programa 
usando el nombre de la función como se ve: 


LET m=doble x=x 
FOR j=1 TO alea 123 


FRINT nombre variable uno 


PROCEDIMIENTOS 


Los procedimientos son muvy similares a las 
$tunciones, «cepto que usted puede 
programar acciones dentro de ellos que no 
sean solamente matemáticas. 


Los procedimientos pueden alterar los 
colores de la pantalla, producir sonidos, 
desplazar la pantalla hacia arriba, 


manipular cadenas, o cualquier  COSsa. Como 
regla general, puede asumir que toda acción 
que se pueda realizar com el SuperBASIC, se 
puede realizar con un procedimiento. 


He aqui un programa simple que nos muestra 
como se define lun procedimiento: 


10 DEFine FEODCedure mult_nomb (nom_cuenta) 


20 LOCAL yo_mismo 

0 FOR yo_mismo = 1 TO nom_cuenta 
40 FRINT "su nombre " 

50 PRINL- AS ES 
60 PEXINT  PMOOIOIOIOROOOOIOIOIO OOO kk "" 
70 END FOR yo_mismo 


80 END DEF:ne 


Lo puede llamar incluyendo simplemete el 


nombre del procedimiento dentro de su 
programa: 

100 .. . . 

110 FROCedure mult_nomb (100) 

¿de a AA 


Fuede ver como su nombre se imprime el 
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námero de veces que usted ponga (100, en 
la linea 110) a continuación de la llamada 


del procedimiento entre paréntesis. Debe 
incluir éste número (o una variable) si el 
procedimiento lo requiere. Si no hay 


número dentro de la definición del procedi- 
miento (como en el siguiente ejemplo) no 
necesita incluir un par de paréntesis 
vacios. 


10 DEFine FROCedure truncar 
ZO LOCAL Es$ 
ZO -. B$=A$(1 TO (LEN At$)/2) 
40 FRINT Es 
50 END DEFine 


Este es llamado asi: 


LODO a 

110 A$="su nombre" 
120 FROCedure truncar 
130 ... |. 


Como puede ver, los procedimientos le 
permiten añadir palabras al vocabulario de 
programación del QAL, tal y como se hace en 
el lenguaje FORTH. 


A diferencia de la funciones, que están 
restringidas a manipulaciones matemáticas, 
los procedimientos pueden ejecutar 


cualquier cosa que el QAL pueda hacer. 


CAPITULO 10 — GRAFICOS 


El QAL está posee una rica gama de palabras 
para controlar la pantalla, ventanas, 
bordes, color y otras cosas. El vocabulario 
de pantalla incluye: 


AT BLOCE 
BORDEF: CLS 
CSIZE CUF:SOR 
FLASH INE 
OVER FAN 
FAFEF: FRINT 
RECOL SCROLL 
STRIP UNDER 
y WINDOW 


Todos estos (con la excepción de FRINT) 
van seguidos por números que le dicen al (CL 
exactamente qué es lo que usted  guiere 
hacer. 

En la mayoria de los casos, el número 
puede tener uno, dos o tres valores (tales 
como 0, 1 o Z2 para SCROLL). RECOL puede 
tomar uno de ocho valores (de Cero a 
siete). 


COLOR 


Usted puede controlar tres clases de 
colores en el Ol. La primera es el color de 
fondo (referido en adelante simplemete como 
“color”. La segunda puede ser el color de 
"contraste" y la tercera es el color produ- 
cido por el uso de la capacidad de *puntea- 
do* dei OL. El color se puede controlar por 

EL 


argumentos simples, dobles o triples. 
CONTROL DEL COLOR 


Aqui vemos comc se representan los colores 
dentro del octeto de color. Los tres bits 
inferiores se encargan del color principal 
ícolor?, los tres siguientes del color de 
contraste (XOR del color principal) y los 
dos bits superiores se ponen de acuerdo con 
la muestra de punteado que haya escogido: 
FRINCIFAL 


FUNTEADO CONTRASTE (XOF) 


1 1 

4 1 

' Ú 

) 1 

E E dy 4 2 

Si usted quiere un color sólido (Bj. sin 

tunteado), especifique solamente los tres 
bits de abajo. 


El control de color es referido como 
simple, doble o triple. Foniendo solamente 
los tres bits de abajo, para color sólido, 
haremos Una definición simple (con un sclo 
argumento siguiendo A la sentencia 
relevante, como en FAFER 22. Si selecciona 
uña definición doble, le dice al aL: que 
quiere una definición de contraste (dos 
námeros siquen a la sentencia, como en 
Faper 1,3%. La definición triple permite 
seleccionar el color. principal, el 
contraste y el punteado. 


PUNTEADOS 


La reprodución del punteado resulta muy 
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pobre en un televisor. Fara verlo adecuada- 
mente, necesitará un monitor. Sin embargo, 
como usted descubrirá en su propio televi- 
sor, los efectos de  Punteado pueden ser 
usados para producir colores diferentes a 
los no-punteados. 


Hay cuatro muestras de punteado, la 
primera que se ve aqui (marcada como tres) 
es el punteado que se obtiene si no se le 
especifica una muestra particular. 


Parr 
SS Pts" Ajedrezado (defecto) 
NO E 
> DO 77777 
of AGA 
O AN 
a id 


e 


rr Linea horizontal 
SILO 0 


TA 4 
Pg" Linea vertical 
LAR ic a 


Hay dos grados de resolución en el OL. El 
modo elegido (256 Oo S12) determina no 
solamente la resolución del dibujo, sino 
también el número de colores que se pueden 
obtener. Notará que hay alguna 


e] 


MODOS 
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*"inter+terencia” entre pixels (elementos de 
dibujo) en el modo de alta resolución 
cuando lo saca por un televisor. Necesita 
un monitor para verlos correctamente. Note 
que cuando usa la sentencia MODE en un 
programa, todas las ventanas y canales que 
corresponden a esas ventanas se cierran. 


MODE 256: En este modo, la pantalla tiene 
256 pixels de ancho por 256 de alto. En 
este modo puede usar ocho colores: 


2 + negro 

1 >= azul 

Aa 7 Fajo 

- púrpura o magenta 
- verde 

o “azul claro oO Cyan 
£ amarillo 

= Bianco 


Como en el Spectrum, estos dan varios 
tonos de gris en un televisor o monitor de 
blanco y negro, en un rango que va desde el 
negro hasta el blanco. 


MODO S12: Este modo pone la pantalla del AL 
con 512 pixels de ancho y 256 de alto. Hay 
solamente cuatro colores disponibles en 
este modo: 
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PJ 


4 3 
¿2 verde 
a 
6 3 
= blanco 
E > 
Aunque este modo reduce el rango de 


colores que se pueden producir, el punteado 
le permite crear uma gram cantidad de 
colores. He aquí un programa que demuestra 
el rango de colores disponible en el QL: 


10 REMark Demostracion de colores 
¿O MODE S12 


ZO FOR fondo = O TO 7 

40 FOR contraste = O TO 7 

SO FOR punteado = O TO 2 

60 FAPFER fondo,contraste, punteado 

7O FRINT "Fondo "ifondo;" Contraste "; 
contraste" Funteado "¡punteado 

80 FOR t=1 TO 40: NEXT t 

90 END FOR punteado 

100 END FOR contraste 


110 END FOR fondo 
Como con cualquier programa, =1 quiere 


pararlo antes de que se haya completado, 
pulse CTRL y la barra de espaciado. 


1 


PRINT Y PALABRAS RELACCIONADAS 


Una de las palabras más comunmente "usadas 
en BASIC es FRINT. Como en otros BASICs, 
SuperBRASIC. usa el FRINT para sacar 
información a la pantalla. Sin embargo, 
también permite mandar información a otros 
dispositivos, como a la impresora. 


La pantalla es el *dispositivo de salida 
por defecto”, que significa que, s1 no 
especifica un dispositivo, FRERINT — imprimirá 
en la pantalla. Sin embargo, si ha definido 
previamente un dispositivo, como una 
iMpresora, FRINT — mandará la información 
alli, hasta que anule esta instrucción del 
dispositivo con otra. 


El uso más simple es como sique: 
FRINT "Que tal, superestrella" 


Esto imprime el inspirado mensaje "Que 
tal, superestrella” directamente en la 
pantalla del QL. 


Los 
" 


números de dispositivo deben estar en 
el n 


ango de cero a diez y sels. 

La salida del aL. incluye el uso de 
"separadores”, que le permiten dar  — formato 
a la salida de  PRINT, aunque no esté 
completamente segura de la longitud de los 
párrafos individuales. 
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Hay cuatro separadores: 


: - este puede ser utilizado como un 
"espacio inteligente”. Fondrá un espacio 
entre las diferentes palabras que  1mprima 
en la pantalla, o s1 la siguiente ha de ser 


truncada, empezará una nueva linea para 
ella. Si el espacio cae en el principio de 
una linea, el ; suprimirá el espacio 
sobrante: 


10 FOR palabras=1 TO numero 
ZO  FRINT A$í(palabras)' (palabras) 
ZO END FOR palabras 


, -= La coma es el modo usual de espaciar 
la salida en la pantalla, produciendo 
columnas claras: 


10 FOR cuenta=1 TO total 
ZO  FRINT categorialcuenta), 
ZO END FOR cuenta 
id - el apóstrofe manda al QOL a una linea 
nueva: 


10 FOR mucho=i1 TO cosas 

20 FRINT EOX$ (mucho) ; 

30 IF SXINT (mucho/3)>=mucho THEN 
PRINT ?* "-—-'" 2? "EXRX" 2 Moo! 

40 END FOR mucho 


7 - finalmente el punto y coma asegura que 
la salida sigue inmediatamente después de 


la salida anterior: 


es 


10 FOR numeros = 1 TO 255 
20 PRINT numeros" - "¿CHR$(numeros) 
3O END FOR humeros 


Ejecutando estos programas verá el efecto 
que crean los diferentes separadores. 


INK y PAPER 


Como en el Spectrum, INK es el color en el. 
que el OL escribe, FAFER es el fondo sobre 
el que escribe. Se necesita usar CLS 
(limpiar la pantalla) después del comando 
FAPER para poner toda la pantalla con el 
color de fondo. El formato es simple. Debe 
poner el número, que determina el color que 
usted quiere, justo después de la palabra 
PAFER: 


PAPER 3: CLS 


Esto pondrá el fondo de color magenta en 
MODE 236 y rojo en MODE S12. 


INE 1 


Esto pondrá azul el color de tinta en MODE 
256 y negro en MODE S12. 


Una buena combinación de colores para 
programar y el que yo he elegido, es: 


PAPER 13 INK 72 CLS 
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Esto nos dará escritura blanca sobre'fondo 
azuds 


LIMPIEZA DE LA PANTALLA 


Ya dije anteriormente que se nec 
el CLS para poner el: nuevo 
1 


sobre toda la pantalla. 51 el CLS no 25 
precedido por el comando  FAFER, el CL 
simplemente limpia la pantalla de todo 10 
que hubiera en ella. 

Puede poner, detrás del LS, un númer 
(del O al 4) para modificar esta “limpieza” 


global: 


Go un £ detrás del COLS es 15 
mismo gue no poner mada (Es. zolo 
ia) 

1 - Este, limpia toda la parte 
superior de la pantalla, excepto 
la linea del cursor. 

Zz “casi 1gual que el 1, excepto 


que limplía la parte + 
pantalia, pera desa también LA 
linea del cursor. 

a limpia toca la linea del 
cursor. 


4  - poniendo un 4 detrás del LS 
puede limpiar solamente la parte 
derecha de la linea del Cursor. 
empezando con el carácter sobre el 
que está el cursor e incluido él. 


BORDER 


El comando BORDER en el QL es mucho más 
flexible que el del Spectrum. El BORDER es 
el área gue rodea el área del FAFER. Fuede 
controlar el ancho y el color del borde, y 
puede poner varios bordes, de colores 
diferentes, unos dentro de otros. 


El siguiente programa produce un borde 
salvaje, parpadeante, que sale del centro 
de la pantalla, dejando una pequeña área de 
FAFER en el medio: 


10 FOR w=50 TO 2 STEP -2 
20 BORDER w, END(0 TO 7) 
70 END FOR w 


FLASH y STRIP 
Esto suena mucho más fascinante de lo que 
realmente es. Hay dos entre varios comandos 


adicionales que son usados para mejorar la 
salida del FRINT: 
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sia salida del FERINT puede ser normal 
o *"parpadeante” (en el gue se cambia 
el FAFEF: y 21 INE alternativamente). 


Este programa nos lo muestra en 
acción: 

10 FRINT "Yo no parpadeo" 

20 FOR j¡=1 TO 100:NEXT 5 

S0 FLASH 1 

40 FRINT "Fero yo s1'i” 

SO FOR ¿=1 TO 100:¿NEXT 5 

61 ELASH 0 

70 PRINT "Sin embargo, yo no" 

Como puede ver, ELASH 1 pone el 
parpadeo, y FLASH £ lo quita. El 
FLASH sólo se puede usar en MCDE 256. 

Y STALLAS Estos comandos funcionan 
juntos. OVER (que va seguido por —1, 
Oo 13 determina la forma en que el 
QL va a *socbre-imprimir?. STRIF (que 
es seguido por uan ríimero de color) es 
el color de fondo que va a poner el 
aL en la pantalla en conjunción con 
la opción OVER 1: 


STRIF 1 (selecciona un fondo azul 


rayado para usar con OVER 1) 


OVER -i (con éste se puede i¡mrimir 


sobre el anterior material 
está en la pantalla) 


que 


OVER 0 
imprima en 
actual en e 


OVER 1 
que desea 


color de tinta actual, 


(le dice al 


ordenador 
de 


que 
el color tinta 
1 STRIP) 


(se usa para informar al QAL 


transparente) 


UNDER: No tiene nada 
inverso, sino 
capacidad del 
salidas bajo 
color de tinta 


INE: 
RINT 
UNDER 1 
FRINT 
UNDER 0 
PRINT "y 


10 
20 
ZO 
40 
50 


60 


PAN Y SCROLL 


Fuede usar estas sentencias para 


efectos especiales. 
SCROLL del ZX81, 
linea completa, 
en pixels, haciendo 
miento de la pantall 
puede imaginar como 
mueve el contenido 
izquierda O a la 
pixels que usted le 


2: FAP 
"Esto es normal" 


que mueve la pantalla 
el SCROLL del AL 


imprimir usando el 

en un STRIF 

que ver con el OVER 

que se refiere ala 

Ou de subrayar sus 

demanda y usando el 
actual: 
ER ISCLS 


"Esto esta subrayado" 


esto no" 


producir 
con el 
una 
se mueve 
posible un  desplaza- 
a más suave. FAN, se 
um SCROLL lateral, que 
de la pantalla ala 
derecha el námero de 
defina. 
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En contraste 


FAN: si pone detrás del comando FAN: un 
número positivo, desplazará hacia la 
izquierda, la ventana completa que 
está usando en ese momento, el número 
de pixels especificado por este 
número. 


Esto significa que FAN 24 moverá el 
material que está en la pantalla 24 
pixels hacia la izquierda, con 
algunos FAFER extra rellenando la 
parte derecha. Una instrucción como 
FAN -63 moverá lo que hay en. la 
pantalla 635 pixels a la derecha, y de 
nuevo rellenará la izquierda con 
FAFER. 


Fuede poner dos números detrás de 


FAN. El primerc, como arriba, 
controla el movimiento de los pixels 
(con el signo controlando la 


dirección?. El segundo número puede 
ser 3.0 4. 51 es 1 (como en FAN 
=234 3, el AL hará el FAN sólo en la 
linea del cursor (en este caso Zo 
pixels a la derecha). S1 el segundo 
número es 4 (como en FAN  -235,4) su 
ordenador hará el FAN en la linea del 
cursor desde (e incluyendo) la 
posición del cursor. 


SU RUE Esto mueve el contenido de la 
ventana hacia arriba 0. abajo. De 
forma similar a FAN, puede 
especificar la dirección y el número 
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de pixels sobre los que la pantalla 
hará el SCROLL, asi mismo, FAPER 
reemplaza la parte vacia del área de 
la pantalla. 


Si SCROLL va seguido por un número 
sencillo, moverá el contenido de la 
ventana hacia arriba (si el número es 
positivo, como SCROLL 19% para mover 
19 pixels arriba) D abajo (si el 
número es negativo). 


Si quiere que el SCROLL sea de una 
parte de la pantalla, puede añadir un 
segundo número. Añadiendo un 1 ícomo 
en SCROLL 12,1) le dice al QUL que 
haga SCROLL sólo de la parte superior 
de la ventana y un 2 (como en SCROLL 
12,2) permite al ordenador saber  —que 
usted quiere hacer SCROLL de la parte 
baja de la ventana. En ambos Casos, 
la linea del cursor no está incluida 
en el material que se desplaza. : 


DANDO TAMAÑO A LAS COSAS 


El SuperBASIC del QAL viene con la  maravi- 
llosa sentencia CSIZE (que significa tamaño 
de carácter). Esto le permite cambiar el 
tamaño de cada carácter que aparacerá en la 
pantalla, dentro de ciertos limites. 


Cuando enciende el aL, el tamaño de 
carácter es puesto a 2,0 si está trabajando 
en MODE 256, y a 0,0 en MODE S12. 
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Hay 


cuatro tamaños de anchura, y dos 


tamaños de altura. Fuede verlos en acción 
con este programa: 


10 
20 
ZÓ 
40 
SO 
60 
70 


Como 
ancho 


INFUT "Introduzca altura (0 o 1)";h 
IF hi OR hw*1 THEN GOTO 10 

INPUT "Ahora anchura (0 a 23)":¿w 

IF wíi0 OR w3 THEN 30 

CSIZE w.h 

FRINT *"Asi se ve con " 

FRINT "altura "¿h;3" y anchura":;w 


se puede ver en este programa, 
puede ser entre O y 3, y el alto 0 


1. Los números de control de anchura 
carácter son: , 


CODIGO ; TAMARO ¡; MODE ¡ MODE 
ANCHO | pixels :; 256 ¡ S12 
Leo E 
8) ; 6 1. 42 ¡1 85 
Ln A io 
1 ¡ 8 1.32 1 64 
o a 
Ps 12 il «2d 42 
A A 
5 ; 16 ; 16 $ =de 
o a 
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el 
o 
de 


Y así es como se controla la altura: 


CODIGO ¡ TAMANO : FILAS 

ALTURA ; pixels 

a o cc A 
9) ; 10 : Rd 

a a cp Rm o e o o o co o js o o e o e e 
1 ; ZO ; 1% 

e e o e E — — e e A e e 


CAPITULO 11 -— 
SYSTEMAS DE COORDENADAS 


Los diseñadores del QL tomaron una hoja 
del libro del EEC Micro, y se aseguraron de 
que la posición de los puntos trazados en 
la pantalla no cambiara al cambiar de modo. 
Esto significa que puede trabajar en MODE 


312 en un monitor para realizar sus 
gráficos, y cambiar después a MODE 236 para 
verlo en su televisor, sin tener que 


recalcular laboriosamente todos los datos. 
Hay dos sistemas de coordenadas. 
EL SISTEMA DE GRAFICOS 


El “sistema de coordenadas gráficas” pone 
el origen LOs 0 en la parte inferior 
izquierda de la escala, y determina que la 
altura de la pantalla es de 100 unidades. 


El formato de la ventana determina lo 
lejos que puede llegar a lo largo de la 
escala  X. Sin embargo, la escala de 
unidades es de uno a Uno con las del eje Y. 


Cinco de los procedimientos gráficos son 
MOVE (para mover el cursor gráfico), ARC ( 
que dibuja un arco de circunferencia), LINE 
(para dibujar una línea) y ELLIFSE (que se 
usa para producir una elipse). 
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coordenada Y. 


comando LINE especifican el punto final de 
la linea. Si añade un tercer núnero, la 
linea girará ese número de grados según se 
dibuja. También puede dibujar varias lineas 
usando TO con las coordenadas (como en LINE 
dai0. ES 105, 10)5 


EL SISTEMA DE PIXELS 


Mientras que el sistema de coordenadas 
gráficas empieza en la esquina inferior 
izquierda, el sistema de coordenadas de 
pixels empieza en la esquina superior 
izquierda de la pantalla, y se usa para 
especificar cosas como posicion y tamaño de 
las ventanas. 


Y 
AH 
Y, 


e 


[Y 


Este sistema, en vez de usar uma unidad 
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arbitraria que sea uma centésima de la 
altura de la pantalla, se refiere ala 
posición en la pantalla en pixels, 
asumiendo siempre que el QL está en MODE 
312. Sin embargo, esto no tiene importancia 
si está en MODE 256 ya que el QAL se acomoda 
automaticamente al modo en el que está 
trabajando. 


Ciertos comandos, como WINDOW, se 
especifican en relacción con el origen de 
la ventana por defecto. 


VENTANAS 


Mediante el uso de ventanas Usted puede 
preparar un número de *mini-pantallas” 
dentro de la pantalla del QlL. Cada una de 
esas ventanas actúan como lima pequeña 
pantalla, desplazando su texto separadamen- 
te, Fuede modificar los colores de FAFER e 
INE de las ventanas individualmente, y Usar 
comandos como CLS en cada una. 


El comando WINDOW se usa para definir una 
nueva ventana. Fara usarlo, necesita 
introducir cuatro números de) variables 
numéricas) como sigue: 


WINDOW 3y_empiece, y_empiece,<_ancho, y_alto 


Note que necesita usar las coordenadas en 
pixels para crear las ventanas. 
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Hay unos cuantos comandos, relaccionados 
con las ventanas, que aceptan un número 
extra que determina exactamente cómo debe 
comportarse el comando. Estos comandos son 
EORDER, FAFER, INE, STRIF, FAN y SCROLL. El 
parámetro extra puede ser entre cero y 
cuatro, y tiene el siguiente efecto: 


O toda la pantalla 


á como € pero excluida la linea del 
cursor 

a parte baja de la pantalla excluida 
la linea del cursor 

> toda la linea del cursor 

a derecha de la linea del cursor, 


cincluido éste 


El comando CURSOR se usa para mover el 
cursor de la pantalla a una posición 
elegida dentro de una ventana. 


Si quiere tener más de uma ventana en la 
pantalla al mismo tiempo, debe designar las 
ventanas con *núámeros de canal”. Este 
námero de canal debe preceder a las coorde- 
nadas dentro de la sentencia WINDOW: 


WINDOW numero_canal,x_empiece... 


Una vez que ha definido la ventana, debe 
añadir su número de canal en las sentencias 
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parámetros 


los 


de 
para modificar 


antes 


cionen, 


olor 


el (ua 


debe Usar... 


es el número de la 


es el color de INE. 


<« donde 


= 
el 


y 


ventana, 
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CAPITULO 12 — 
TRATANDO CON DATA 


READ y DATA son un par de palabras que 
aparecen en el mismo programa y que están 
intimamente relaccionadas, aunque pueden 
estar muy alejadas dentro del programa. 


READ le permite introducirse en un banco 
de datos (DATA), para usarlos dentro del 
programa. For ejemplo, el siguiente progra- 
ma rellena los elementos de la matriz 
brillo$ con una serie de colores: 


10 DiMension brillo*+$(35) 

ZO FOR color=0 TO S 

30 READ brillo$(í(color) 

40 END FOR color 

50 DATA "AMARILLO", "VERDE", "NEGRO" 
60 DATA "FURFURA", "AZUL", "NARANJA" 


Fara comprobar que los DATA (los elementos 
de las líneas 50 y 60) han sido 
introducidos dentro de la matriz por la 
sentencia READ de la linea 30, puede añadir 
las siguientes lineas a su programa y 
ejecutarlo de nuevo: 


70 FOR color=0 TO S 


80 FRINT brilloícolor) 
90 END FOR color 


como puede ver, el QAL ignora las lineas S0 
y 60 cuando llega a ellas. Las lineas DATA 
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son leidas solamente cuando se necesitan, 
pero en cualquier otro moment ou son 
ignoradas por el ordenador. 


No tiene importancia el emplazamiento de 
las sentencias DATA dentro de su programa, 
como podrá ver cuando ejecute el siguiente 
programa en su fiel QL: 


10 DATA "Ruston" 

ZO DiMension autor$(6) 

ZO FOR libro=0 TO 6 

40 DATA"Hartnell","Greenshields" 
0 READ autor (libro) 

60 DATA "Gifford", "Hole" 

7O END FOR libro 

Sa DATA "Shaw", "Vincent" 

90 FOR salida=6 TO O STEF -1 
100 FRINT autor (salida) 
110 END FOR salida 


El programa encontrará fácilmente los DATA 
á pesar de estar esparcidos por cualquier 
parte íy alguno de ellos está incluso 
dentro de un bucle FOR/END FOR), e imprimi- 
rá lo siguiente cuando lo ejecute: 


Vincent 

Shaw 

Hola 

Giff+ford 
Greenshields 
Hartnell 
Ruston 
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RESTORE 


La tercera palabra que se usa en  conjun- 
ción con READ y DATÁ es RESTORE.  RESTORE 
mueve el "apuntador de datos” al principio 
de un bloque de DATA, como muestra este 
programa: 


10 DIiMension miro$(8) 
20 FOR veo=0 TO 8 
ZO IF veo=4 THEN RESTORE 


40 READ miro$(veo) 

SO FRINT miros$(íveo)3" "; 

60 END FOR veo 

70 DATA "esto", "es", "una”, "prueba” 


80 DATA "del","uso","del","RESTORE" 


En un examen rápido de este programa, 
usted puede'pensar que la salida deberla 
ser asl: 


esto es una prueba del uso del RESTORE 


Sin embargo, cuando usted lo ejecute en su 
OL, verá que imprime esto: 


esto es una prueba esto es una prueba 


El  RESTORE de la linea 20 mueve el 
apuntador de datos al principio del DATA 
cuando veo es 1igllal a cuatro, de forma que 
la sentencia READ vuelve a empezar de 
NUEVO. 


LOT 


El RESTORE puede ir tamién a una linea 
especifica, como se ve en este programa: 


106 FOR comedor=1 TO 8 
20 IF END(1 TO 8)=4 THEN RESTORE 100 


0 READ pizzas 

40 PFRINT pirzrzat 

SO END FOR comedor 

60 DATA "Wegetarianco”, "Cucaracha" 


7O DATA "Cuatro Estaciones", "Anchoas" 
80 DATA "Fastel", "Albaricoque" 

900 DATA "Bolsito Verde" 

100 DATA "Sabio", "Mago", "Maravilloso" 
110 DATA "Malo", "Derrochon”","Manirroto" 
120 DATA "Es el Sr Mostaza" 

130 DATA "Fildora", "Amarga" 


Si el número aleatorio generado en la 
linea 20 es igual a 4, entonces el 
apuntador de datos se va a la linea 100, Y 
comienza a leer por ahi. Esto significa que 
la salida puede ser (si €el 4 es generado 
después del quinto dato leldo): 


Vegetariano 

Cucaracha 

Cuatro Estaciones 

Anchoas 

Fastel 

Sabio r 
Mago 

Maravilloso 


DATÁ es usado normalmente para ¡introducir 
valores especificos dentro de las matrices 
al principio de un programa. 
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CAPITULO 13 — 


EXTENDIENDO SU VOCABULARIO 


TRACE 


El comando TRACE se usa para poder seguir 
la ejecución de un programa (del mismo modo 
que la mayoria de los BASIC, y peliculas de 
Walt Disney, usan la palabra TRON). Una vez 
que lo ha puesto en marcha, tecleando 
TRACE, verá aparecer en la pantalla el 
número de la linea que se está ejecutando 
en ese momento (o el canal seleccionado). 
Fuede desactivarla tecleando TRACE de 
nuevo. Si no quiere estropear lo que tiene 
en la pantalla, puede mandar la información 


del TRACE - por ejemplo — a una impresora. 
Tenga en cuenta que el canal de la 
impresora debe haber sido abierto 


previamente. 
NUMEROS ALEATORIOS 


Los números aleatorios se Usan mucho en 
juegos y programas de simulación. El AL usa 
un método particular para especificar los 
námeros que usted quiere. La primera forma 
del comando usa solamente la palabra FKND, 
sin ningún parámetro: 


10 PRINT RND;5" "sx 
20 GOTO 10 


Si ejecuta este programa en su aL, 
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cobtendrá aparentemente una lista de números 
entre cero Y uno. 


Si quiere generar enteros aleatorios entre 
cero y un limite superior, debe cambiar la 
11 


nea 10% de la siguiente +orma: 


10 PRINTORND(limiteJp" o"; 
20 GOTO 10 


limite como 7, obtendrá algo 


+ fm 
iñ da 

ír 
Hp] 
28 q 
pa 


e es que usted quiera, en 
s generar números aleatorios 


¡Omen 
en un rango gue no sea desde el cero a un 
limite superior. En este caso, debe hacer 
so de la palabra 70 como sigue: 


PRINT ENDiílim_interior TO lim_superior) 
Dentro de un programa puede aparecer como 
éste (que nos dará numeros aleatorios entre 


Ta Y LITE 


10 PRINT RND(95 TO 105)¿" "; 
20 GOTO 10 
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La salida de este programa puede ser ésta: 


104 96 103 101 93 97 101 
78.103 1039972 TOZ 10093 


AUTO se za para generar números de linea 
automáticamente cuando se introduce un 
programa. Puede parar la acción de AUTO 
mediante la tecla ESC. 


CLEAR se usa para limpiar todas las 
variables de sus valores. Cuando da KUN a 
un programa, el QL hace un CLEAR de las 
variables automáticamente. 


Mientras que CLEAR se usa para limpiar las 
variables de sus valores, NEW se usa para 
borrar todo: las variables y el programa. 
Debe usarse con sumo cuidado. 


PAUSE 

El comando FAUSE se usa cuando quiere que 
el programa pare su egzecución durante un 
tiempo estipulado. La palabra FAUSE va 
seguida de un número: 


FAUSE 200 


Cada unidad de pausa es Z20Oms. 
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PONIENDO REMARKS 

Una sentencia REMark es usada dentro de un 
programa cuando se quiere explicar algo, 
pero no quiere que el ordenador tenga esa 
linea en cuenta. He aqui un ejemplo: 

LO REMari Este programa prueba el END 

Una sentencia RKEMark puede ir detrás de 
ctra sentencia  cuaíquiera dentro de una 
linea del programa: 


100 FEINT "Ha ganade!":REMark Fin j¿uego 


For supuesto, no puede comenzar una linea 
multi-sentencia con una sentencia REMark: 


430 REMark Final:FRINT "Ha ganado!" 


La segunda mitad de esta linea nunca se 
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OBTENIENDO LISTADOS 


El comando LIST le permite obtener un 
listado de.su programa en la pantalla o en 
cualquier otro dispositivo. 


Fuede ser usado de cuatro formas 
diferentes: 


LIST 100 TO 120 listará desde la linea 100 
hasta la linea 120 inclusive. 


LIST 100 TO lista todas las líneas del 
programa, empezando por la linea 100 
hasta la última. 


LIST TO 100 empezará en la primera linea 
del programa, y listará hasta la linea 
100 inclusive. 


LIST 100 listará solamente la linea 100 


OTROS COMANDOS 
PEEE y FOKE le permiten mirar dentro 
(FEEK) de una posición de memoria o 


modificarla (FOKE). Se usa como sigue... 


PEEK dirección 
FOKE dirección,nnn 


<« «para decirle al QL que quiere un acceso 
a nivel de octeto (8 bit). Añadiendo ,1 al 
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final de la linea como sigue... 


FEEE dirección, 1 
FOFE dirección,nnn, 1 


« «le indica que quiere un acceso a nivel 
de palabra (16 bit). 


Fuede añadirle sO al  fimal de la 
sentencia, que indica un acceso a nivel 
octeto, pero si lo omite, el QAL asume que 
es un caso ,O. 


STOP 


Como usted puede suponer, STOF se usa para 
detener un programa: 


100 us 

120 IF resp$="Constantinopla" THEN STOF 

130 FRINT "Esto no es lo que estaba 
buscando" 

140 ... 
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INPUT 


Esta sentencia se usa para introducir 
datos ínuméricos (O. cadenas) dentro del 
programa que está ejecutándose en el QL. Su 
torma es: 


INFUT "Cual es tu nombre”?":inombres+ 
INPUT "Gue edad tienes”?;edad 


Si guiere aceptar más de una entrada en 
una sentencia  INFUT, puede Usar 10s 
separadores para dar formato a sus 
preguntas: 


INFUT "Cuantos?"'num, "Edad" 'av 
INFUT "Nombre?"!n8, "Apellido?"'a$ 
INKEYS$ 


INKEYS se usa para leer teclas del teclado 
(c. de otro canal si se ha designado). El 
programa pasará sobre una linea INKEY*% si 
un carácter particular que se está buscando 
no está presente: 


10 1 TAKEVYS<"" THEN -10 
20 1F INKEEY$="" THEN 20 
20 1F INEEY$="a" THEN PRINT "OK" 


Este breve programa usa INFKEYS$ para leer el 
teclado, y retiene el programa <s1 no se 


pulsa una tecla (esto es, INFEY* no devuelve 
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una cadena vacila. Una vez que el teclado 
está libre, el OL pasa a la linea 20, que 
retiene la acción hasta que se pulsa una 
tecla. Entonces el programa pasa a la linea 
0. Si la tecíia pulsada es la "a" minúscula 
(Esto es, INKEEYS$="a") entonces el aL 


This ís a desomstration to show QUILL in use. Ue see 
foce. Now ve have chansed 


low face unich is Yi 
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CAPITULO 14 — 
QDOS Y CANALES 


QDOS es el nombre del sistema operativo 
del ordenador. ADOS tiene muchas cosas que 
hacer. Cuida de los sels sistemas 
principales dentro del ordenador: 


- determina que parte del ordenador 
ha de realizar cada tarea, y después 

- controla la salida a pantalla 

- maneja los Microdrives 

— supervisa el QLAN (red de datos de área 
¿local? y la interfase RS-232-C 

-- lee el teclado | sa 

Tr actda como “administrador” de memoria 


El. mapa de memoria del OL tiene dos 
versiones. la ' primera se basa en el 
"hardware", y la segunda en la organización 
de la RAM del sistema impuesta por.el ADOS. 
(Tenga en cuenta que estos mapás han sido 
dibujados cuando el OL - estaba : todavia en 
desarroyo.). 2d | 


$ + 
FFFFF | vectores ; estado 7 procesador 
' interrup. : solamente 
e ai a A ¡ 
RESERVADA 

BAODODOO 1 — — e ; 

¡ RAM 96 ; 
O ¡ 

¡ RAM 32 ¡ 


LODO JAR ice it ¡ 


'; RESERVADA ; expansión E/S 


IGODO SRA : 
18000 ; ES ; 
; RESERVADA : dl pe 
LODDO | ——————————— > 
¡| ROM  Z2K o mormalm. conectada 
DBA | —— ; 
¡ ROM  Z32K ; sistema 
DONDE e e e e + 
El mapa de memoria dentro de la RAM es 


determinado por el QADOS: 


SV_RAMT-=1 += ooo o-- - 
o Frocedimientos ; Se llena 
SY -RESPR. 3 residentes ; hacia 
A ; abajo 
; Frogramas ; 
SV_TANSF Transitorios ; 


Datos intérprete del 
comandos SuperBASIC! 


1 
' 
i 
» 
¡ de 
1 
Ú 
1 


SW_BASIC programas SuperBASICi 
: Bloque libre para  : 
SV-.-FREE ¿ Uso del subsistema : 


A 7 O A A A A FP A PP PX o 


Se llena 


oO 
ul 
J 
w 
- 
D 
“n 
X 
|) 
re 
5 
O 
4] 


datos hacia 

SV_HEAF ps A ' arriba 

' Tablas del sistema 

; + - ya 

¡ Variables sistema ; 
L£380DO. HEX === cs ce e 0 cs o e ¡ 

' Memoria de pantalla: 

CANALES 


Usted usará frecuentemente los canales 
cuando trabaje con el QlL, de modo que es 
importante que tenga una idea clara de lo 
que son. 

Muy simple, son las tuberias por las que 
la información sale y entra de las cosas 
que están enganchadas al QL (dispositivos). 

Antes de que usted pueda usar una de esas 
tuberias, debe abrirlas con el comando OFEN 
(y cuando haya terminado con ellas, debe 
cerrarlas con el comando CLOSE). Algunas de 
estas tuberias se abren automaticamente 


cuando enciende el aL. Les llamamos 
"canales por defecto”, y actúan como 
"dispositivos por defecto". La pantalla es 
un dispositivo por detecto. Si no 


especifica, por ejemplo, que la salida del 
FRINT debe ir a alguna otra parte por otra 
tuberia, se irá a la pantalla. NO puede 
cerrar un canal por defecto. 
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Los canales se identifican asionándoles 
números. Una vez que le ha asignado un 
número a un canal, este número es todo lo 
que necesita el QL para saber que 
dispositivo quiere usar. 


He aqui un sumario de las palabras del aL 
para controlar E/S: 


BAUD n 

CLOSE kn 

COFY_N nombre TO nombre 
DELETE nombre SN 


DIR [*n,J] nombre 

FORMAT [*n,J nombre 

NET numero de estacion de la red 
OFEN nn, nombre 

OPEN TN ss 

OFEN_NEW .. 


Y estas son para dispositivos E/S: 


SCR[_tamañolflAposición] 

CON[T_tamañolfAposiciónJ[_teclado 
longitud teclal 

SERERIALOE/M/SIUH/LILDREZALO 

MDVYn_nombre 

NETC[I/O01[_otra estación] 


APENDICES: 


1 — MICRODRIVES 


2 — FUNCIONES 
MATEMATICAS 


3 -— COMO EMPEZO TODO 
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1 — CUIDADO Y MONTAJE 


DE MICRODRIVES 


Debe dar formato a lo 
Microdrives unas cuan 
acondicionar la cinta. 
comando FORMAT que se us 
forma: 


FORMAT MVD1_rnombre_del_cartucho 
Tenga en cuenta que si hace 
1 


cartucho usado, toda la 
contenga desaparecerá. 


FORMAT de un 
4 : 


Estas son laz partes principalez de un 
cartucho de Microdrive:z 


Hs e BUCLE de Criata 


2 ES Co EA ico protección escritura 


y 
Ú 
ga co etiqueta 
Í 


os 


PO A 


1 


+t-bucle cinta  +-=-- etiguetas 


os Microdriwves son la forma 
principa acenamiento en su al, debe 
tratarlos con ciidado. Haga Una copla de 
seguridad del material realmente importante 
e 


Debido a que 
Al 


CL 
m 
m 

n Er 
= 


nara el caso de que falle algo en el cartu- 
cho que está usando. Somo cada cartucho 
puede almacenar hasta alrededor de  100kK, 
puede separar unos cuantos cartuchos para 
copias de seguridad. Solo le llevará un 
momento llenar estas copias. 


Dentro del cartucho hay un bucle de cinta 
de aproximadamente cinco metros, (200 pulga- 
das) de longitud. Está metida dentro de una 
pegueña Caja de plástico y gira ala 
velocidad aproximada de Z.2= Em por hora (l. 
6 millas). Esto puede no sonar muy rápido, 
pero significa que la cinta pasa por la 
cabeza de lectura a unos 71.559 cms por 
segundo. 


Aunque la cinta que hay dentro... del 
cartucho es de video, no es invulnerable, y 
necesita ser tratada con cuidado. No toque 
la cinta. 23 aparece la cinta por los 
puntos marcados en el diagrama como "bucle 
de cinta", vuelvala a su lugar  cuidadosa- 
mente, pero no lc haga con los dedos. 


añar los datos de un cartucho si lo 
o saca repetidamente sin usarlo 0 
si apaga y enciende el QAL con él montado. 


For lo generai, tenga en cuenta que los 
pequeños y delicados cartuchos son bastante 
tfrágiles y necesitan ser tratados con 
cuidado. 


Puede conectar hasta sels Microdrives 
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adicionales al QL. El comando CAT (usado en 
la forma CAT MDV1 o CAT "MDV2") se usa para 
obtener la lista de ficheros del cartucho 
del Microdrive designado. 


El comando COFY se usa para copiar la 
información de un punto del sistema a otro. 


Se conecta el canal de origen con el: sde 
destino con la palabra TO, como en COFY 
MDV1 TO MDV2. Si quiere borrar un fichero 
particular de un cartucho, use el comando 
DELETE en el siguiente formato: DELETE 
MDVi_nombre_del_*fichero. 


Fara cargar un programa dentro del (AL 
desde un Microdrive, use el comando LOAD 
MDV1_nombre_del_fichero. Ya que MDV1 es el 


dispositivo por defecto, no necesita 
especificarlo si lo está cargando desde el 
primer Microdrive. En este caso, LOAD 


nombre_del_fichero es todo lo que necesita. 
Si quiere que arranque automaticamente el 
programa una vez que se haya cargado (como 
el comando CHAIN de otros ordenadores, como 
el BBC Micro), use LRUN en vez de LOAD. 
Fara salvar programas debe usar SAVE  MDV1_ 
_nombre_del_fichero. Y como en LOAD, MDV 1 
es el dispositivo por defecto y por lo 
tanto no necesita ser especificado. 


Comandos y funciones de control de progra- 
mas: 


CLEAR 

CONT INJE 

DLINE lista de rangos 

EXEC nombre 

EXEC_YWY nombre 

LEYTES nombre, dirección principio 

LIST [*n,71 lista de rangos 

LOAD nombre 

CRÚUN nombre 

MERGE nombre 

MRERUN nombre 

NEW 

RENUM [linea £T70 lineal; 

[principiolí,incrementol 

RETEY 

RUN Enúmero de lineal 

SAVE nombre [lista de rangos] 

SBYTES nombre, dirección principio, 

longitud 

SEXEC nombre, dirección principio, 
longitud, espacio de datos 

STOF 


comandos y funciones: 


CHE$ codigo de carácter] 

CODE [cadenal 

MODE 4/8/2536/S512 

FEEE [dirección] 

PEE: lr LA01CeEciona 

FEEEF_W [dirección] 

FOFE cirección.,octeto 

FOFRE_i dirección,palabra 
POFE_W dirección,palabra larga 
RND [(lm TO In)] 


2-FUNCIONES MATEMATICAS 


El AL proporciona un grupo de funciones 
trigonométricas y matemáticas. La siguiente 
lista las describe brevemente. Los ángulos. 
para las funciones triginométricas necesi- 
tan ser expresados en radianes. 


COS - devuelve el coseno de un número que 
debe estar entre  -—60000 y  +60000. Fara 
usarla debe poner la palabra COS seguida 


del argumento entre paréntesis: COS(564) 


SIN - devulve el seno del argumento y, 
como en COS, opera en el rango de -60000 y 
+60000. El formato es SIN(argumento). 


EZ1 


TAN. — TANtargumento) O la tangente 
del argumento, que debe estar entre 30000 
y FIO00G, Uselo como TAN(90) 

TAR y ACCOIT 56 Usan para determinar el arco 


ferencia de las funciones anteriores, 
no hay limite para el dd (aparte del 
1 ite oropio del aL Fuede usar estos 
como ATAN (argumento)? y AC Tíargumento). 


tangente y arco cotangente de un argumento. 
1 


COT - produce la cotangente de un ángulo. 
Coma en TAN, solo trabaja con argumentos 
entre —3OC0O y +30000, E rmato es el 


y 
mismo que en los otros: COT are mato) 


EXF - se hisa para obtener *e elevado a la 
potencia del argumento. Fara asegurarse que 
no sobrepasa 1035 limites aritméticos del 
Ala el argumento debe estar entre 300 y 
¿30% Se usa como EXF (argumento) 


LN y LOG. - se usan para obtener logaritmos 
E mentos. £¿N da el logaritmo natural, 
06 devuelve el logaritmo en base 10. El 

ento debe ser positivo, pero no tiene 
lite superior (aparte de el del QAL> 


NT — devuelve el entero de un argumento, 
ido. por ejemplo, 29 para INT(29.8756) y 
8 para 1INTC28, 787. «El AS debe 
tar entre —22787 y +27 31 quiere 
dondear el námero al Ad entero, 
ada 2.5 como en 1INTiínUdmero+O0, 5) 


es) 
paa 


ABS  - da el valor absoluto de un argumento 
devolviendo el mismo número si el argumen-— 
to es positivo, esto es ABS(674) dará 674, 
y mencs el argumento si este es negativo, 
esto es ABSI(-1452) es 24592 


SORT.  — se Usa para obtener la raiz cuadra- 
da de un argumento, que debe ser mayor de 
cero. Fonga el argumento a continuación de 
SGRT entre-paréntesis, como SORT (8706) 


LOADING QL Al 


copyright 
PSION SYSTEMS LTD 


s 


3-COMO EMPEZO TODO 


Asi empezó todo. Con la carta que 
anunciaba que el QL 1va a ser revelado: 


124 


Traducción de la carta de anuncio del (QL: 
INVITACION 


Z= Enero 1984 


Tengo el gran placer de invitarle para 
asistir a una conferencia de prensa, dada 
por Clive Sinclair y Nigel Searle el Jueves 
12 de Enero, para el lanzamiento del nuevo 
micro-ordenador de Sinclair Research. 


Tendrá lugar en la Sala de conferencias del 
Hotel Inter-Continental, Hamilton Flace, (a 
la cerecha de Fark Lane), W1i,. empezará a 
las 10.3% puntualmente seguida, aproximada- 
mente a las 11.45, de una demostración: 
técnica detallada y un coloquio para 
aguellos que deseen quedarse. 


También será bienvenido a un desayuno que 
se ofrecerá a las 9.70. 


Le pido disculpas por la brevedad de la 
nota y espero que usted, oO su representan- 
te, puedan asistir. Nos seria de gran ayuda 
que nos confirmara su asistencia mediante 
la tarjeta con franqueo pagado que le 
incluimos o por teléfono. > 


FOR FAVOR: La información contenida en esta 
invitación es confidencial hasta las 11 am 
del 12 de Enero. 


Aquí tiene su oportunidad de ex- 
plorar el potencial de SuperBASIC, el 
sofisticado lenguaje suministrado 
con el Sinclair QL. 


Diseñado para ayudarle a escribir 
programas mejores y más claros, el 
SuperBASIC de Sinclair es un lengua- 
je de Programación que es una obra 
de arté, un lenguaje que se comple- 
menta con las innovaciones “hardwa- 
re” del ordenador. 


Andrew Nelson, autor de varios 
libros p lares de ordenadores, ex- 
plica todos los conceptos importan- 
tes, palabras clave, comandos y sen- 
tencias de SuperBASIC. En este libro, 
explica que muchas de las habilidades 
de programación que usted tiene de 
su Spectrum pueden ser transferidas 

* directamente al QL, y nos muestra 
también como -a medida que aprende 
palabras nuevas de su vocabulario- 
sus programas pueden hacerse gra- 
dualmente más complejos, mediante 
la incorporación de los nuevos co- 
mandos y sentencias. 


x TA-ma 


